mirror of
https://github.com/agdamsbo/daDoctoR.git
synced 2024-11-22 11:50:23 +01:00
u
This commit is contained in:
parent
e177156660
commit
39dc511e12
@ -72,7 +72,7 @@ rep_glm<-function(y,vars,string,ci=FALSE,data){
|
||||
x1<-x[,i]
|
||||
|
||||
if (is.factor(x1)){
|
||||
pred<-paste(names(x1)[i],levels(x1)[-1],sep = "_")
|
||||
pred<-paste(names(x)[i],levels(x1)[-1],sep = "_")
|
||||
}
|
||||
|
||||
else {pred<-names(x)[i]}
|
||||
|
Loading…
Reference in New Issue
Block a user