inst/shiny-examples/scdhlm/code-chunks/clean-example-nofilter-TR.R

In jepusto/scdhlm: Estimating Hierarchical Linear Models for Single-Case Designs

# Clean data

dat <- dat[,c("{user_parms}")]
names(dat) <- c("case","session","phase","outcome")

dat <- preprocess_SCD(design = "{user_design}", 
                      case = case, 
                      phase = phase, 
                      session = session, 
                      outcome = outcome, 
                      data = dat)