作者Aqery (脑残巨婴没药医)
看板Statistics
标题Re: [程式] R合并资料
时间Sat Nov 13 06:15:33 2010
※ 引述《kylan ()》之铭言：
: 标题: [程式] R合并资料
: 时间: Fri Nov 12 22:13:49 2010
:
※ 发信站: 批踢踢实业坊(ptt.cc)
: ◆ From: 144.82.200.149
: → Aqery:?merge 11/12 22:18
: → kylan:我试过拉 merge(A,B,by.x="",by.y="")资料长度不同不行 11/12 22:22
: → kylan:cbind也要资料长度一样 11/12 22:22
就是 merge 无误，长度无关，请 ?merge 仔细看一下使用方法
以下是模拟你的资料，并使用merge的结果
> set.seed(123)
> A = data.frame(doctor=sample(1:5, 10, TRUE),
+ salary=round(rnorm(10, 100, 30), 1))
> B = data.frame(id=1:5, type=LETTERS[1:5])
> A
doctor salary
1 2 151.5
2 4 113.8
3 3 62.0
4 5 79.4
5 5 86.6
6 1 136.7
7 3 110.8
8 5 112.0
9 3 103.3
10 3 83.3
> B
id type
1 1 A
2 2 B
3 3 C
4 4 D
5 5 E
> merge(A, B, by.x="doctor", by.y="id")
doctor salary type
1 1 136.7 A
2 2 151.5 B
3 3 62.0 C
4 3 103.3 C
5 3 83.3 C
6 3 110.8 C
7 4 113.8 D
8 5 79.4 E
9 5 112.0 E
10 5 86.6 E
--
电影名导谈情慾:高尚、艺术、台湾之光
动漫作品谈性:变态、死阿宅、误人子弟
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 124.197.7.119
※ 编辑: Aqery 来自: 124.197.7.119 (11/13 06:16)
1F：推 kylan:sorry昨天这样做不出来 今天又突然可以了 11/13 07:05
2F：→ kylan:by = intersect(doctor, id) 应该是一样的吧 11/13 07:06
3F：→ clickhere:使用 <- 取代 = 可能会好一点. 虽然意义上并无不同. 11/14 03:46
4F：→ clickhere:"=" 并没有相对应的符号 "<<-", 内部功能就差很远了. 11/14 03:48