search

biostatsPMH / reportRx

Tools for automatically generating reproducible clinical report
Creative Commons Zero v1.0 Universal
2 stars 1 forks source link

mvsum() now fails with lme models #17

Closed JessicaWeiss closed 3 years ago

JessicaWeiss commented 3 years ago

I believe the issue is in the new call object definition call <- paste(deparse(model$formula), collapse = "")

Here is an example library(nlme) model <- lme(distance ~ age + Sex, data = Orthodont, random = ~ 1|Subject) call <- paste(deparse(model$formula), collapse = "") #New call call <- paste(deparse(summary(model)$call),collapse="") #Original call

egosv commented 3 years ago

This has been fixed now. Changed to call <- Reduce(paste, deparse(formula(model$terms), width.cutoff = 500)) which is used for other models.