我必须按“洗发水”数据集中的“ VALUE”过滤前500个项目。
我已使用订单函数将数据按“降序”排序
attach(Shampoo)
Shampoo2019YTD <- Shampoo[order(-VALUE),]
,并且正在使用此代码过滤Top500。
Subset <- by(Shampoo2019YTD, Shampoo2019YTD["VALUE"], head, n=500)
Reduce(rbind, Subset)
但是现在我希望将此“子集”作为excel文件,该怎么办?听起来可能很愚蠢,但请帮忙。
答案 0 :(得分:0)
尝试:
write.csv(Subset, "top500_shampoo.csv")
这会将.csv放入您的工作目录中。