为由换行符分隔的多列打印正确的摘要（）答案

【问题标题】：Print correct summary() for multiple columns separated by a newline为由换行符分隔的多列打印正确的摘要（）
【发布时间】：2022-12-16 00:12:42
【问题描述】：

我想显示多个 summery() 表。但是输出有点难看。

data(cars)
df = cars
for (col in c('speed', 'dist')) {

    print(cat('\n', summary(df[col])))
}

输出是

 Min.   : 4.0   1st Qu.:12.0   Median :15.0   Mean   :15.4   3rd Qu.:19.0   Max.   :25.0  NULL

 Min.   :  2.00   1st Qu.: 26.00   Median : 36.00   Mean   : 42.98   3rd Qu.: 56.00   Max.   :120.00  NULL

该输出的好处是“表”之间有一个新行。但是这些表看起来与它们像这样一个一个地显式调用时看起来不同：

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
    4.0    12.0    15.0    15.4    19.0    25.0 

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   2.00   26.00   36.00   42.98   56.00  120.00

【问题讨论】：

标签： r

【解决方案1】：

使用 [[ 而不是 [ 将摘要打印为一行，并将 cat(" ") 分隔成一个单独的调用：

for (col in c('speed', 'dist')) {
  print(summary(df[[col]]))
  cat("
")
  # print(cat('
', summary(df[[col]])))
}

Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
4.0    12.0    15.0    15.4    19.0    25.0 

Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
2.00   26.00   36.00   42.98   56.00  120.00

【讨论】：