Handle multiple lines

nlmixr2 · Sep 4, 2024 · 2b39f57 · 2b39f57
1 parent b3c36d9
commit 2b39f57
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/mlxtranChangeEquation.R b/R/mlxtranChangeEquation.R
@@ -22,7 +22,7 @@
   if (is.null(.cov$dplyr)) {
     return(NULL)
   }
-  .e <- str2lang(paste0("{", .cov$dplyr, "}"))
+  .e <- str2lang(paste0("{", paste(.cov$dplyr, collapse="\n"), "}"))
   .ret <- lapply(seq_along(.e)[-1],
                  function(i) {
                    .e[[i]][[3]]