楼主: Nelsh--Deng
1950 6

[问答] R运行出错 [推广有奖]

  • 13关注
  • 7粉丝

学科带头人

41%

还不是VIP/贵宾

-

威望
0
论坛币
9879 个
通用积分
9.1063
学术水平
13 点
热心指数
14 点
信用等级
11 点
经验
46170 点
帖子
1005
精华
0
在线时间
2723 小时
注册时间
2012-12-21
最后登录
2024-4-25

相似文件 换一批

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
程序如下vars <- c("mpg", "hp", "wt")
mtcars[vars]
dstats <- function(x)(c(mean=mean(x), sd=sd(x)))
by(mtcars[vars], mtcars$am, dstats)

请高手指点出错的原因,谢谢
二维码

扫码加我 拉你入群

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

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

关键词:运行出错 vars ARS VaR R语言学习

沙发
feng026 发表于 2015-2-14 16:38:59 |只看作者 |坛友微信交流群
1. by 函数 为 dstats提供的是两个data.frame, 可以尝试运行一下就知道问题 :

by(mtcars[, vars], mtcars$$(去掉其中一个$)am, function(x)(class(x)))

2. 一个丑一点的解决方法:

dstats <- function(x)(c(mean=mean(x), sd=sd(x)))

by(mtcars[, vars], mtcars$am, function(x){apply(x, 2, dstats)})
已有 1 人评分论坛币 收起 理由
admin_kefu + 50 热心帮助其他会员

总评分: 论坛币 + 50   查看全部评分

使用道具

藤椅
Nelsh--Deng 发表于 2015-2-14 20:20:43 |只看作者 |坛友微信交流群
feng026 发表于 2015-2-14 16:38
1. by 函数 为 dstats提供的是两个data.frame, 可以尝试运行一下就知道问题 :

by(mtcars[, vars], mt ...
谢谢您的指点!但关于错误原因我还是不能理解,但您的另一种方法却给我启示,要学会自己创造,真的谢谢您的回复!

使用道具

板凳
liu7788414 在职认证  发表于 2015-2-14 22:38:24 |只看作者 |坛友微信交流群
你可以单步调试一下你写的函数,对于大于2列的情况,已经出错,你需要加强那个函数。
比如运行调试 dstats(mtcars[,vars]),看下图

Untitled.png (212.02 KB)

Untitled.png

已有 1 人评分论坛币 收起 理由
admin_kefu + 50 热心帮助其他会员

总评分: 论坛币 + 50   查看全部评分

使用道具

报纸
Nelsh--Deng 发表于 2015-2-15 14:17:33 |只看作者 |坛友微信交流群
liu7788414 发表于 2015-2-14 22:38
你可以单步调试一下你写的函数,对于大于2列的情况,已经出错,你需要加强那个函数。
比如运行调试 dstats ...
谢谢您的回复,但我没有看懂你这个图,似乎不是R软件吧,有点想LATEX,?????

使用道具

地板
liu7788414 在职认证  发表于 2015-2-15 18:00:07 |只看作者 |坛友微信交流群
RStudio,安装R语言后,再安装这个开发环境。

使用道具

7
Nelsh--Deng 发表于 2015-2-15 18:34:37 |只看作者 |坛友微信交流群
liu7788414 发表于 2015-2-15 18:00
RStudio,安装R语言后,再安装这个开发环境。
哦,受教了,谢谢!

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-4-28 10:28