search for: myset2

Displaying 2 results from an estimated 2 matches for "myset2".

Did you mean: myset
2009 May 18
1
Barchart in lattice - wrong order of groups, data labels on top of each other, and a legend question
...pective bar? 3. Is there any way to make the legend group items horizontally as opposed to now (vertically - taking up too much space) Thanks a lot! Dimitri ### Section 1: generates my data set "data" - just run: ##### N<-100 myset1<-c(1,2,3,4,5) probs1<-c(.05,.10,.15,.40,.30) myset2<-c(0,1) probs2<-c(.65,.30) myset3<-c(1,2,3,4,5,6,7) probs3<-c(.02,.03,.10,.15,.20,.30,.20) group<-unlist(lapply(1:4,function(x){ out<-rep(x,25) return(out) })) set.seed(1) a<-sample(myset1, N, replace = TRUE,probs1) a[which(rbinom(100,2,.01)==1)]<-NA set.seed(12) b<-sa...
2009 May 16
1
barplot in a loop not printing out to directory
...plotted to the screen but does not print the plots themselves anywhere (and not in the directory). Thank you very much for your help! Dimitri ### Section 1. This section generates my data set "data" - no problems there: N<-100 myset1<-c(1,2,3,4,5) probs1<-c(.05,.10,.15,.40,.30) myset2<-c(0,1) probs2<-c(.65,.30) myset3<-c(1,2,3,4,5,6,7) probs3<-c(.02,.03,.10,.15,.20,.30,.20) group<-as.factor(sapply(1:4,function(x){ out<-rep(x,25) out })) set.seed(1) a<-sample(myset1, N, replace = TRUE,probs1) a[which(rbinom(100,2,.01)==1)]<-NA set.seed(12) b<-sample(...