如何删除 RMarkdown 中 descr() 的标头？答案

【问题标题】：How do I remove the header in RMarkdown for descr()?如何删除 RMarkdown 中 descr() 的标头？
【发布时间】：2021-06-06 16:05:20
【问题描述】：

我正在尝试在我的 RMarkdown pdf 文档中创建一个基本的描述性汇总表。

data(iris)
library(summarytools)

iris %>%
  group_by(Species) %>%
  descr(Sepal.Length, stats = "fivenum", headings = FALSE)

我得到以下输出：

Descriptive Statistics  
Sepal.Length by Species  
Data Frame: iris  
N: 50  

               setosa   versicolor   virginica
------------ -------- ------------ -----------
         Min     4.30         4.90        4.90
          Q1     4.80         5.60        6.20
      Median     5.00         5.90        6.50
          Q3     5.20         6.30        6.90
         Max     5.80         7.00        7.90

如何从最终输出中去掉这部分？：

Descriptive Statistics  
Sepal.Length by Species  
Data Frame: iris  
N: 50

我以为headings = FALSE 会这样做，但我想我错了！任何帮助将不胜感激。

【问题讨论】：

标签： r summarytools

【解决方案1】：

应该很快修复，但与此同时，这将起作用：

iris %>%
  group_by(Species) %>%
  descr(Sepal.Length, stats = "fivenum") %>% 
  print(headings = FALSE)

##                setosa   versicolor   virginica
## ------------ -------- ------------ -----------
##          Min     4.30         4.90        4.90
##           Q1     4.80         5.60        6.20
##       Median     5.00         5.90        6.50
##           Q3     5.20         6.30        6.90
##          Max     5.80         7.00        7.90

【讨论】：

【解决方案2】：

我会使用tb 去掉上面的“描述性”部分，然后使用kable 为Rmarkdown 输出制作一个漂亮的表格。例如：

library(summarytools)
library(dplyr)

iris %>%
        group_by(Species) %>%
        descr(Sepal.Length, stats = "fivenum") %>%
        tb() %>%
        knitr::kable()

输出：

|Species    |variable     | min|  q1| med|  q3| max|
|:----------|:------------|---:|---:|---:|---:|---:|
|setosa     |Sepal.Length | 4.3| 4.8| 5.0| 5.2| 5.8|
|versicolor |Sepal.Length | 4.9| 5.6| 5.9| 6.3| 7.0|
|virginica  |Sepal.Length | 4.9| 6.2| 6.5| 6.9| 7.9|

我们还可以使用t() 转置表格。例如：

iris %>%
        group_by(Species) %>%
        descr(Sepal.Length, stats = "fivenum") %>%
        tb() %>%
        t() %>%
        knitr::kable()

|         |             |             |             |
|:--------|:------------|:------------|:------------|
|Species  |setosa       |versicolor   |virginica    |
|variable |Sepal.Length |Sepal.Length |Sepal.Length |
|min      |4.3          |4.9          |4.9          |
|q1       |4.8          |5.6          |6.2          |
|med      |5.0          |5.9          |6.5          |
|q3       |5.2          |6.3          |6.9          |
|max      |5.8          |7.0          |7.9          |

【讨论】：

是否可以删除包含“Sepal.Length”的“变量”行？
@hy9fesh 在第二个表中？
是的，第二张桌子。
@hy9fesh 你可以在tb()和t()之间插入select(-variable) %>%