if (FALSE) {
mirtCAT_preamble(df=df)
runApp(createShinyGUI(host_server = FALSE), port = 8000) # run locally
person <- getPerson()
summary(person)
runApp(createShinyGUI(), port = 8000) # for remote server hosting
}
Run the code above in your browser using DataLab