search for: fqnondi

...67,6738,68,7,8,9,),fq=c(8,11,1,2,4,4,2, 2,6,3,4,2,2,1,1,1,4,51,3,1,1,1,1,35,1,1,19,2,1,1,1,14,1,1,1,10,13,5,),fqcvd= c(5,8,1,1,3,3,2,2,5,3,4,2,2,0,1,1,3,13,2,1,1,1,1,17,1,0,11,2,1,1,1,7,1,1,1,7 ,7,1,),fqcan=c(1,1,0,2,1,1,1,0,3,0,2,0,1,0,1,0,1,4,2,1,1,0,0,4,1,1,2,2,0,1,0 ,2,0,1,1,2,3,1,),fqnondis=c(8,11,1,2,4,4,2,2,6,3,4,2,2,1,1,1,4,50,3,1,1,1,1, 34,1,1,19,2,1,1,1,14,1,1,1,10,12,5,)) k3<-with(df3,rep(x,times=fq)) kcvd3<-with(df3,rep(x,times=fqcvd)) kcvd3<-c(kcvd3,rep(NA,times=length(k3)-length(kcvd3))) kcan3<-with(df3,rep(x,times=fqcan)) kcan3<-c(kcan3,rep(...