# NOT RUN {
library("mixor")
data("schizophrenia")
### Random intercept
SCHIZO1.fit<-mixor(imps79o ~ TxDrug + SqrtWeek + TxSWeek, data=schizophrenia,
id=id, link="probit")
summary(SCHIZO1.fit)
# }
Run the code above in your browser using DataLab