求助----R软件数据集合并！！！！急

toby3003

4808

收藏 2014-03-19

数据集1：

ID	time	dose
1	1	a
2	1	b
3	1	c
4	1	d

数据集2：

ID	time	dose
1	2	x
2	2	y
3	2	z

希望合并成：

ID	time	dose
1	1	a
1	2	x
2	1	b
2	2	y
3	1	c
3	2	z

怎样编辑好呢，多谢多谢

扫码加我拉你入群

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

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

全部回复

toby3003

2014-3-19 16:49:03

大神们帮帮忙==：我用merge命令貌似搞不定。主要就是要共同项保留，

扫码加我拉你入群

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

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

nieqiang110

2014-3-19 18:58:35

data<-rbind(data1,data2)
data<-data[order(data$ID),]

扫码加我拉你入群

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

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

toby3003

2014-3-19 22:15:35

nieqiang110 发表于 2014-3-19 18:58
data

貌似不可以的，我只想保留共有的

扫码加我拉你入群

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

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

jmpamao

2014-3-19 22:19:23

toby3003 发表于 2014-3-19 22:15
貌似不可以的，我只想保留共有的

ID 共有吗？

扫码加我拉你入群

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

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

jmpamao

2014-3-19 22:29:08

如果是ID 共有的话，就是保留重复项

复制代码

扫码加我拉你入群

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

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

点击查看更多内容…

toby3003

2014-3-19 23:21:18

jmpamao 发表于 2014-3-19 22:29
如果是ID 共有的话，就是保留重复项

多谢，但是我有点看不懂，有共同id的，>0是什么意思呢？两个duplicated相加是什么意思呢，以前没有用过这条命令，谢谢

扫码加我拉你入群

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

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

jmpamao

2014-3-20 09:12:37

toby3003 发表于 2014-3-19 23:21
多谢，但是我有点看不懂，有共同id的，>0是什么意思呢？两个duplicated相加是什么意思呢，以前没有用过这 ...

duplicated （）判断是否重复，返回的逻辑值
   1 2 3 4 1 2 3
如： F F F F T T T (重头判断）
   T T T F F F F  （重尾部判断， fromLast=T）
+
-------------------------------
   1  1 1 0 1 1 1  >0  T T T F T T T

具体看帮助吧

扫码加我拉你入群

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

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

toby3003

2014-3-20 10:32:14

jmpamao 发表于 2014-3-20 09:12
duplicated （）判断是否重复，返回的逻辑值
1 2 3 4 1 2 3
如： F F F F T T T (重头判断）

多谢您的回答，我想请问一下，按照我这样的编辑，是不是也可以

复制代码

扫码加我拉你入群

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

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

jmpamao

2014-3-20 21:35:52

toby3003 发表于 2014-3-20 10:32
多谢您的回答，我想请问一下，按照我这样的编辑，是不是也可以

要看你数据。。。。1、data1，data2 中 ID 都是独立的，没有重复项
2、data1 中ID 包含 data2中的ID
那么应该没有问题

match一旦不满足着两个条件应该会出NA

而 duplicated 只需要满足第一个条件

#####下面说的，有点是答非所问####但也不删除了#####
match 如果匹配成功，返回的是第一个值得位置

复制代码

c(1,2) 中的1 跟c(3,1,1)匹配，第二个1匹配OK，返回被匹配的位置为2，
C(1，2) 中的2匹配不成功，返回NA.
延伸下， %in% 比match 用的多，其实它的返回值是判断 match 返回值是否大于0（其实就是看是否有NA）,
c(1，2)%in%c(3,1,1)
> [1] T F

扫码加我拉你入群

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

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

jmpamao

2014-3-20 22:33:03

c1<-data1$ID%in%data2$ID
c2 <- data2$ID%in%data1$ID
rbind(data1[c1,],data2[c2,])

你的思路是这个不？这样子的话，上面两个条件都不需要

扫码加我拉你入群

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

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

toby3003

2014-3-21 10:52:09

jmpamao 发表于 2014-3-20 22:33
c1

我的情况是这样的：我有一组随访数据，不同人的次数是不一样的，有些人有20次，有些人只有2,3次，所以我想在这些随访数据中找出都有12次的人。开始我就用data<-subset(aa,time<=12)找出总的人数，然后我就用您给我的那个语句，data<-data[duplicated(data[,1])+duplicated(data[,1],fromLast=T)>0,]但是现在并没有找出共同项，所以现在我也不知道怎么弄好了，多谢

扫码加我拉你入群

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

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

jmpamao

2014-3-21 17:38:58

还是不清楚是什么样的数据及你的需求

扫码加我拉你入群

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

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

toby3003

2014-3-21 20:07:03

jmpamao 发表于 2014-3-21 17:38
还是不清楚是什么样的数据及你的需求

数据格式：

healthid	随访次数	x
1	1	a
1	2	b
1	3	c
1	4	d
1	5	e
2	1	f
2	2	g
2	3	h
2	4	i
3	1	g
3	2	k
3	3	l

我想的是提出每个healthid的前三组数据，也就是每个人随访三次的数据。不知道我说的是否明白。。。

扫码加我拉你入群

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

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

jmpamao

2014-3-21 20:56:41

toby3003 发表于 2014-3-21 20:07
数据格式：
我想的是提出每个healthid的前三组数据，也就是每个人随访三次的数据。不知道我说的是否明白 ...

是不是这样的？

复制代码

扫码加我拉你入群

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

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

toby3003

2014-3-22 01:24:34

jmpamao 发表于 2014-3-21 20:56
是不是这样的？

谢谢您认真的回复，但是我现在的情况是，我有大概2万多糖尿病患者的数据，随访一共量差不多30万次随访，我统计了一下每人随访的数量如下：（第一排是随访次数，第二排是随访该次数的人） 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 .....
26287 25170 23824 22706 21633 20373 19135 17731 16264 14829 13287 11907 10150 8592 7558 6248 4875 3913 ....

我计划整理出有12次随访的患者的数据，按照您给我的方法，貌似不太可行。。我想请问一下，哪种方法比较高效一些。
我之前用的方法是：

复制代码

然后把随访11次10次。。。。1次这种的数据筛选好，然后把所有数据rbind一下，但是我发现貌似得不到我想要的数据，所以挺郁闷的，请帮我想想，多谢多谢！

扫码加我拉你入群

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

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

zhangyangsmith

2014-3-22 04:14:02

toby3003 发表于 2014-3-22 01:24
谢谢您认真的回复，但是我现在的情况是，我有大概2万多糖尿病患者的数据，随访一共量差不多30万次随访，我 ...

You have actually had a very good idea by counting the number of patients who have been visited for a specific number. Instead you probably should count the number of visits for each patient.

Following @jmpamao 's example:

复制代码

Keep in mind the names of frq is character in type, if the id field in the original dataset is not of type character you will need to convert it explicitly (as done above).

@jmpamao, this is the first time I see someone using read.table in such a "datalines" fashion.

扫码加我拉你入群

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

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

jmpamao

2014-3-22 08:00:34

toby3003 发表于 2014-3-22 01:24
谢谢您认真的回复，但是我现在的情况是，我有大概2万多糖尿病患者的数据，随访一共量差不多30万次随访，我 ...

你的需求是这样吗？把所有有12次随访的数据集合。比如 ID1，有1:14次随访，只需要其1:12的数据， ID2 有1:5次的随访，ID5舍弃？再试试看下面的，看看要多少时间？

复制代码

@zhangyangsmith 这种形式是text=“复制，粘贴方便”

扫码加我拉你入群

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

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

jmpamao

2014-3-22 08:23:10

我模拟了下你的情况，速度很快的

复制代码

扫码加我拉你入群

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

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

风之栖梧

2014-4-10 11:29:25

楼主，我看了你首先的问题，可以用reshape包来重铸，

复制代码

扫码加我拉你入群

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

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

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群