Displaying 1 result from an estimated 1 matches for "lstm0".
Did you mean:
lst0
2013 Apr 13
1
how to add a row vector in a dataframe
...ion(x)
x));if(nrow(dat)!=0) >{glm.1<-glm(y~x1+x2+x3+x4+x8+x9+x10,data=dat)}
else NULL; glm.1; m1<- predict(glm.1)})
>
>simdata.ps0<- simdata1
>simdata.ps0[]<-do.call(c,lapply(seq_len(ncol(simdata1)),function(i) lapply(simdata1[,i],function(x) x[simdata1[,i]$t==0])))
>lstm0<-lapply(seq_len(ncol(simdata.ps0)),function(i)
{dat<-do.call(data.frame,lapply(simdata.ps0[,i],function(x)
x));if(nrow(dat)!=0) >{glm.0<-glm(y~x1+x2+x3+x4+x8+x9+x10,data=dat)}
else NULL; glm.0; m0<- predict(glm.0)})
>
>simdata.psm1<- rbind(simdata.ps1,m1=lstm1)
>simd...