关于by函数的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

代码：
vars <- c("mpg","hp","wt")
h2 <- function(x)(c(pingjun=mean(x),fangcha=sd(x)))
by(mtcars[vars],mtcars$am,h2)

感觉应该没什么错误，可是却出现

请问大神们代码哪里有问题

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

by函数中调用的函数，只能是可以操作数据框的函数，比如summary。像mean、sd等只能操作向量的函数，使用在by中会出错。

R base 中提供的统计函数，分组计算功能相当的差，而用data.table很方便
h2 <- function(x)(c(pingjun=mean(x),fangcha=sd(x)))
library(data.table)
dt=data.table(mtcars)
dt[,lapply(.SD,h2),by=am]

lanyajia 发表于 2017-9-17 19:29
R base 中提供的统计函数，分组计算功能相当的差，而用data.table很方便
h2

哦哦好的，十分感谢