fix tableby vignette

mayoverse · Apr 1, 2022 · 0a507bb · 0a507bb
1 parent 46ac59b
commit 0a507bb
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/vignettes/tableby.Rmd b/vignettes/tableby.Rmd
@@ -653,8 +653,8 @@ dollarmean <- function(x, na.rm = TRUE, ...) {
  if(na.rm && allNA(x)) {
  as.tbstat(NA_real_)
  } else {
- out <- arsenal_mean(x, na.rm = na.rm, ...)
- attr(out, "fmt") <- "${y}"
+ out <- meansd(x, na.rm = na.rm, ...)
+ attr(out, "fmt") <- "${y[1]}"
  out
  }
 }