This commit is contained in:
agdamsbo 2018-10-09 14:36:13 +02:00
parent cac6172dd6
commit 7c1c1e51b5

View File

@ -19,7 +19,7 @@ plot_ord_odds<-function(x, title = NULL,dec=3,lbls=NULL){
rodds<-round(odds,digits = dec)
if (!is.null(lbls)){
odds$vars<-paste0(v.names," \n",paste0(rodds$or," [",rodds$lo,":",rodds$up,"]"))
odds$vars<-paste0(lbls," \n",paste0(rodds$or," [",rodds$lo,":",rodds$up,"]"))
}
else {
odds$vars<-paste0(row.names(odds)," \n",paste0(rodds$or," [",rodds$lo,":",rodds$up,"]"))