得到与“by”函数相同的结果，但得到一个向量答案

【问题标题】：Get the same result as the "by" function but to a vector得到与“by”函数相同的结果，但得到一个向量
【发布时间】：2015-02-23 07:46:16
【问题描述】：

我目前正在使用 de ggplot 包中的 diamonds 数据集。

我想获得“价格”中位数最高的“切割”字段。我可以使用 by 函数得到结果。

by(diamonds$price, diamonds$cut, median)

我只得到“价格”中位数最高的“切割”的名称。我正在尝试将“by”值传递给矩阵，这样我就可以获得所需的列，但到目前为止还没有成功。有什么建议么？谢谢。

【问题讨论】：

标签： r

【解决方案1】：

by() 是基础 R 函数家族的成员，这些函数按分类因子拆分数据，对拆分执行汇总计算，并以各种不同的格式返回结果。其他包括aggregate()、ave() 和tapply()，我在这里使用后者：

meds <- tapply(diamonds$price, diamonds$cut, median)
names(which.max(meds))
# [1] "Fair"

【讨论】：