andreas/daDoctoR
1
0
Fork 0
mirror of https://github.com/agdamsbo/daDoctoR.git synced 2024-11-22 03:40:23 +01:00
Code Issues Projects Releases Wiki Activity

fix

Browse Source
This commit is contained in:
agdamsbo 2018-10-24 11:28:47 +02:00
parent 8e26088326
commit 93bfc864e5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
R/comb_olr.R
View File

@ -18,6 +18,6 @@ comb_olr<-function(meas,vars,data){
d2<-d[,c(meas,ad)] d2<-d[,c(meas,ad)]
names(d2)[1]<-"meas" names(d2)[1]<-"meas"
x<-polr(meas~.,data = d2,Hess = TRUE) x<-polr(meas~.,data = d2,Hess = TRUE)
mat<-rbind(mat,c(exp(coef(x)), exp(confint(x)))) mat<-cbind(c(exp(coef(x)), exp(confint(x))))
return(data.frame(mat,stringsAsFactors = FALSE)) return(data.frame(mat,stringsAsFactors = FALSE))
} }