This commit is contained in:
agdamsbo 2018-10-11 15:39:02 +02:00
parent 634c647bdc
commit 7f1822f867

View File

@ -24,7 +24,7 @@ rep_lm<-function(meas,vars,string,ci=FALSE,data,fixed.var=FALSE){
x<-data.frame(d[,c(vars,string)]) x<-data.frame(d[,c(vars,string)])
y<-d[,c(meas)] y<-d[,c(meas)]
dt<-cbind(y=y,v)
names(x)<-c(vars,string) names(x)<-c(vars,string)
if (ci==TRUE){ if (ci==TRUE){