如何绘制汇总的汇总数据

Question

我使用R tapply汇总了一组帮助台门票。如何绘制此数据的交叉表示以显示每个类别的五个数字摘要？

tsSummary = tapply(tickets$timeSpent, tickets$category, summary)

$ERROR
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   0.00    1.16   16.26   81.51   61.68  578.40 

$SUPPORT
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   0.00    3.28   24.19   93.02   93.38 2328.00 

$DEFECT
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   0.00    3.71   28.16  134.20  148.90 2572.00 

$SYSTEM
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   0.00    5.33   22.45   95.31   64.61 1178.00 

$OTHERS
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   0.00    1.99   22.17  102.60  115.60 3461.00 

我想绘制（如图像）这样的东西：

          Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
$ERROR    0.00    1.16   16.26   81.51   61.68  578.40 
$SUPPORT  0.00    3.28   24.19   93.02   93.38 2328.00 
$DEFECT   0.00    3.71   28.16  134.20  148.90 2572.00 
$SYSTEM   0.00    5.33   22.45   95.31   64.61 1178.00 
$OTHERS   0.00    1.99   22.17  102.60  115.60 3461.00 

任何帮助？

Answer 1

如果要执行的操作是将表格列表折叠为一个，则可以使用do.call。这是一个类似于使用iris数据集的示例：

tsSummary <- tapply(iris$Sepal.Length, iris$Species, summary)
do.call(rbind, tsSummary)
##            Min. 1st Qu. Median  Mean 3rd Qu. Max.
## setosa      4.3   4.800    5.0 5.006     5.2  5.8
## versicolor  4.9   5.600    5.9 5.936     6.3  7.0
## virginica   4.9   6.225    6.5 6.588     6.9  7.9

如果你想想象这个。您可能需要boxplot：

boxplot(Sepal.Length ~ Species, data = iris)