在表格中打印 DescribeBy 的输出答案

【问题标题】：Print the output of DescribeBy in a table在表格中打印 DescribeBy 的输出
【发布时间】：2020-04-20 09:52:30
【问题描述】：

我想将使用 describeBy 函数获得的输出打印在一个漂亮的表格中，以包含在我的报告中。

means<-describeBy(compdata1$lnfdinet, group=compdata1$namegeozone, mat=TRUE)
> means
    item group1 vars   n     mean       sd   median  trimmed      mad      min      max     range        skew    kurtosis         se
X11    1     AP    1 183 21.69083 1.996922 21.55382 21.61259 2.033396 16.41214 26.23397  9.821830  0.24999690 -0.05324277 0.14761670
X12    2    LAC    1 280 21.02388 1.900368 20.80716 20.98591 1.764128 15.86233 25.22215  9.359819  0.12315398 -0.21092124 0.11356872
X13    3  Other    1 239 21.55694 1.413843 21.50751 21.53762 1.586090 18.23622 24.98966  6.753438  0.09846572 -0.66249855 0.09145388
X14    4    SSA    1 327 19.79257 1.609993 20.00355 19.85755 1.491339 12.10486 23.52093 11.416070 -0.71694582  1.77092546 0.08903281

你知道任何代码吗？

【问题讨论】：

标签： r printing html-table panel-data

【解决方案1】：

我不确定您使用什么软件来编写报告，但以下可能对您有用。

请注意，在发布问题时，请说明您正在使用哪些软件包并尽可能使用预定义的数据集，以使您的示例可重现。

  library(psych)

  means <- describeBy(mtcars$mpg, group=mtcars$gear, mat=TRUE)

  htmlTable::htmlTable(format(means, digits = 2))

【讨论】：

【解决方案2】：

您可以使用 sjPlot 包在 word 文件中进行描述性统计，例如

library(psych)
library(sjPlot)

tab_df(describe(iris),
       digits = 2,
  title = "Descriptive statistics", #give your tables title
  file = "Descriptive_statistics.doc")

【讨论】：