楼主: blank888
940 4

[实际应用] r软件的 [推广有奖]

  • 0关注
  • 1粉丝

学前班

80%

还不是VIP/贵宾

-

威望
0
论坛币
10 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
20 点
帖子
1
精华
0
在线时间
4 小时
注册时间
2016-5-26
最后登录
2016-6-18

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

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

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
rm(list=ls())
same = sample(1:500,100)
index1 = sample(501:5000,500)
index2 = sample(501:5000,300)
id1 = c(same,index1)
id2 = c(same,index2)
name1 <- paste("V",id1,sep="_")
name2 <- paste("V",id2,sep="_")
data1 <- data.frame(id1=name1,y=rnorm(600))
data2 <- data.frame(id2=name2,x1=rbeta(400, 1, 2))
上面的代码是生成数据的,你们不需要去修改任何东西。你们根据上面生成的data1和data2,id1和id2表示名字,将两个数据按照名字进行合并。注意,我们不需要修改为一致的名称,比如id,merge命令可以实现这样类型数据合并。
具体要求:
1、将data1和data2进行合并,合并后的新数据为data_new。
2、将data_new中的y和x1建立回归模型,即y=c+beta1*x1+error,并把结果用表格形式输出,需要包括系数、标准误、t值和p值等。当然,有同学乐意用手动去整理表格的,也非常欢迎。
3、写出merge命令中by.x,by.y,all.x,all.y这四个选项表示什么意思。
这道题怎么做,代码怎么写

二维码

扫码加我 拉你入群

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

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

关键词:r软件 Sample Index AMPL Same 软件

沙发
zl66983279 在职认证  发表于 2016-5-27 10:05:01 |只看作者 |坛友微信交流群
先回答这个:merge命令中by.x,by.y,all.x,all.y
1.by.x也就是x的索引列
2.by.y也就是y的索引列(by.x,by.y一起看就是x的某列(或多列)的值等于x的某列(或多列)的值)
3.all.x=T:表示保留x的所有值,假设x与y关联后,x中有没关联到y的部分,x的值依旧保留。
4.all.y=T:同理,如果学过sql的话,all.x=T可以看成left join,all.y=T可以看成right join。

使用道具

藤椅
zl66983279 在职认证  发表于 2016-5-27 10:13:11 |只看作者 |坛友微信交流群
第一个问题 data_new<- merge(data1,data2,by.x="id1",by.y="id2") #求交集

使用道具

板凳
zl66983279 在职认证  发表于 2016-5-27 15:55:31 |只看作者 |坛友微信交流群
第二个问题
lm1<- lm(data_new$y~data_new$x1)
lm1
其中(Intercept)是常数 ,data_new$x1是x1的系数 ,error是不可测的随机变量。

使用道具

报纸
zl66983279 在职认证  发表于 2016-5-27 15:58:18 |只看作者 |坛友微信交流群
好像显示的代码有些问题
\[lm1<- lm(data_new$y~data_new$x1)\]

使用道具

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

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

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

GMT+8, 2024-5-21 06:49