search for: resultb

Displaying 4 results from an estimated 4 matches for "resultb".

Did you mean: result
2009 Feb 12
3
Looping multiple output values to dataframe
...(result.A, result.B, result.C) # concatenate result vectors variables[i] <- results } variables <- as.data.frame(t(as.matrix(variables))) # turn result vectors into a matrix, then transpose it and output as a data frame # add column and row names c.names <- c("ResultA", "ResultB", "ResultC") # set names for result vectors colnames(variables) <- c.names rownames(variables) <- filenames # export to csv file write.csv(variables, file="/Users/Desktop/Test.csv") # ----------------------------------------END R-CODE--------------------------------...
2007 Nov 29
1
Question about using “par”
...bothering your guys again. I am trying to use "par" to put 6 figures into 3 rows and 2 columns. My code is: op <- par(mfrow = c(1, 2)) xyplot(x1+x2+x3 ~ y, data=resulta, type="l", pch=LETTERS[1:3], lty=c(1:3), main="For k=3, theata1=1") xyplot(x1+x2+x3 ~ y, data=resultb, type="l", pch=LETTERS[1:3], lty=c(1:3), main="For k=3, theata1=5") xyplot(x1+x2+x3 ~ y, data=resultc, type="l", pch=LETTERS[1:3], lty=c(1:3), main="For k=5, theata1=1") xyplot(x1+x2+x3 ~ y, data=resultd, type="l", pch=LETTERS[1:3], lty=c(1:3), ma...
2010 Oct 13
1
(no subject)
Dear all, I have just sent an email with my problem, but I think no one can see the red part, beacuse it is black. So, i am writing again the codes: rm(list=ls()) #remove almost everything in the memory set.seed(180185) nsim <- 10 mresultx <- matrix(-99, nrow=1000, ncol=nsim) mresultb <- matrix(-99, nrow=1000, ncol=nsim) N <- 200 I <- 5 taus <- c(0.480:0.520) h <- c(1:20/1000) alpha1 <- c(1:82) aeven1 <- alpha[2 * 1:41] aodd1 <- alpha[-2 * 1:41] alpha2 <- c(1:40) aeven2 <- alpha2[2 * 1:20] #Create an object to hold results. M <- matrix(0, ncol=82...
2010 Oct 15
0
nomianl response model
...y codes, but the software returns an error: "subscript out of bounds" I dont understand exactly why this is happenning. My codes are the following: rm(list=ls()) #remove almost everything in the memory set.seed(180185) nsim <- 10 mresultx <- matrix(-99, nrow=1000, ncol=nsim) mresultb <- matrix(-99, nrow=1000, ncol=nsim) N <- 200 I <- 5 taus <- c(0.480:0.520) h <- c(1:20/1000) codd <- c(1,3,5,7,9,11,13,15,17,19,21,23,25,27,29,31,33,35,37,39,41,43,45,47,49,51,5 3,55,57,59,61,63,65,67,69,71,73,75,77,79,81) ceven <- c(2,4,6,8,10,12,14,16,18,20,22,24,26,28,30,32...