mirror of
https://github.com/agdamsbo/daDoctoR.git
synced 2024-11-25 21:21:54 +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]
|
x1<-x[,i]
|
||||||
|
|
||||||
if (is.factor(x1)){
|
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]}
|
else {pred<-names(x)[i]}
|
||||||
|
Loading…
Reference in New Issue
Block a user