search for: crossed1

Displaying 1 result from an estimated 1 matches for "crossed1".

Did you mean: crossed
2011 Jan 18
3
error message
...quot; "WAGR3" "WAGR4" "WAGR5" "WAGR6" "WAGR7" [19] "WAGR8" "WAGR9" "WAGR10" "ocbi" "ocbo" "cwbi" "cwbo" > dim(ago) [1] 160 25 Here below is the syntax: > crossed1<-function(df){ + s1<-df[sample(nrow(df),16,replace=F),] + s2<-t(apply(s1[,2:11],1,sample,10)) + s2<-data.frame(s2) + s3<-df[-s1$SubID,] + ind<-t(replicate(nrow(s3),sample(10))) + s4<-matrix(nrow=nrow(s3),ncol=10) + rownames(s4)<-rownames(s3) + s4<-data.frame(s...