带有 qwraps2 的汇总表 - 如何导出表？答案

【问题标题】：Summary Tables with qwraps2 - How do I export the table?带有 qwraps2 的汇总表 - 如何导出表？
【发布时间】：2021-04-23 08:13:49
【问题描述】：

我一定遗漏了一些非常明显的东西......我正在尝试重现 Peter DeWitt here 的 qwraps2 教程的结果我得到了控制台输出，但我不知道如何导出表格来制作它看起来像例子。

我希望能够为 Word 中的出版物手稿创建“快速且简单”的可自定义汇总表，这看起来完全符合我的需要。

非常感谢您的帮助。

这是我使用的代码：

install.packages("qwraps2")  
set.seed(42)
library(qwraps2)
options(qwraps2_markup = 'markdown')

data(mtcars2)
str(mtcars2)

#building summary table
our_summary1 <-
  list("Miles Per Gallon" =
         list("min"       = ~ min(mpg),
              "max"       = ~ max(mpg),
              "mean (sd)" = ~ qwraps2::mean_sd(mpg)),
       "Displacement" =
         list("min"       = ~ min(disp),
              "median"    = ~ median(disp),
              "max"       = ~ max(disp),
              "mean (sd)" = ~ qwraps2::mean_sd(disp)),
       "Weight (1000 lbs)" =
         list("min"       = ~ min(wt),
              "max"       = ~ max(wt),
              "mean (sd)" = ~ qwraps2::mean_sd(wt)),
       "Forward Gears" =
         list("Three" = ~ qwraps2::n_perc0(gear == 3),
              "Four"  = ~ qwraps2::n_perc0(gear == 4),
              "Five"  = ~ qwraps2::n_perc0(gear == 5))
  )

whole <- summary_table(mtcars2, our_summary1)
whole

【问题讨论】：

标签： r qwraps2

【解决方案1】：

您可能需要将代码放在 .Rmd 文件中，并将代码放在 knitr 块中。您可以通过以下方式在 qwraps2 包中查看此类文件的示例：

system.file("doc", "summary-statistics.Rmd", package = "qwraps2")

【讨论】：