R中关于by函数的一个问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

[tr=rgb(255, 252, 247)][/tr]

大家好，有谁知道这个问题怎么解决吗。 dstats <- function(x)(c(mean=mean(x), sd=sd(x))) by(mtcars[vars],mtcars$am, dstats) Error in is.data.frame(x) :   (list) object cannot be coerced to type 'double' In addition: Warning message: In mean.default(x) : argument is not numeric or logical: returning NA 我看R语言实战上面也这么写的。能运行出结果，我的不知道什么问题……有会的，帮忙解答下，谢谢喽！

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：stats dst 大家好

可能是由于现在版本的R中mean和sd函数不能用于数据框的缘故。

不知道vars代表哪列数据，但是这个代码我运行没有报错：

1. > dstats <- function(x)(c(mean=mean(x), sd=sd(x)))
   
2. > by(mtcars$wt,mtcars$am, dstats)
   
3. mtcars$am: 0
   
4.      mean        sd
   
5. 3.7688947 0.7774001
   
6. ---------------------------------------------------------------------------
   
7. mtcars$am: 1
   
8.      mean        sd
   
9. 2.4110000 0.6169816

复制代码

R3.1.1 with RStudio 0.98

Aharach 发表于 2014-8-6 23:19
不知道vars代表哪列数据，但是这个代码我运行没有报错：

R3.1.1 with RStudio 0.98

在R in Action里：
vars <- c("mpg", "hp", "wt")

同问，亲，按R语言实战上的运行出错，但把数据换成mtcars$wt，运行正常，为何？

额，我也遇到了，奇了怪了

dandan716716 发表于 2015-8-28 19:24
同问，亲，按R语言实战上的运行出错，但把数据换成mtcars$wt，运行正常，为何？

道友你现在知道咋回事没有？请教一下

同问不懂啊

同问不懂啊

同样报错啊
> by(mtcars[vars],mtcars$am,dstats)
Show Traceback

Rerun with Debug
Error in is.data.frame(x) :
  (list) object cannot be coerced to type 'double' In addition: Warning message:
In mean.default(x) : 参数不是数值也不是逻辑值：回覆NA