I tried to include a firstpage with instructions. I followed "Customize GUI" demo but when I run the code the first page justdoesn´t appear (no problem with lastpage).
css <- readLines('bootstrap.css')
title <- "REDiC"
authors <- "Aprendemos Todos"
firstpage<- list(h2("Bienvenido"), h5("Trata de responder a cada ejercicio.\n
Buena suerte!"))
lastpage <- function(person){
list(h1("Gracias por tu respuesta"))
}
I tried to include a firstpage with instructions. I followed "Customize GUI" demo but when I run the code the first page justdoesn´t appear (no problem with lastpage).
css <- readLines('bootstrap.css') title <- "REDiC" authors <- "Aprendemos Todos" firstpage<- list(h2("Bienvenido"), h5("Trata de responder a cada ejercicio.\n Buena suerte!"))
lastpage <- function(person){ list(h1("Gracias por tu respuesta")) }
shinyGUI_list <- list(title = title, authors = authors, demographics = demographics, demographics_inputIDs = c('ID','Fecha','name','edad','gender'), firstpage = firstpage, lastpage = lastpage, css = css)
results <- mirtCAT(df=df, shinyGUI = shinyGUI_list)