Question

我使用tapply来获取某些值的平均值，我得到的结果如下：

 5        6        7        8        
 3066.892 1804.489 1754.675 1695.448

当我绘制它时，我得到一个图，其中x轴的“索引”为0到3而不是实际值5到8.如何绘制tapply的输出以使轴标签正确？

Answer 1

您应该能够使用names（）函数来获取值，例如：

names(tapply(values,index,mean))
[1] "5" "6" "7" "8"

xnames <- names(tapply(values,index,mean))

您可以制作没有x轴的图表并添加新的数据标签

plot(tapply(values,index,mean),xaxt="n")
axis(1, at=1:length(xnames), labels=xnames)

我认为这样做会很正常。