tests/missPat.R

library(nlmeU)
dtf <- subset(armd.wide, select = c(visual12, visual24, visual52))
res <-  missPat(dtf, symbols = c("?","+"))

library(testthat)
expect_that(res[1], equals(c("1" = "+??")))

Try the nlmeU package in your browser

Any scripts or data that you put into this service are public.

nlmeU documentation built on May 2, 2019, 6:50 p.m.