R分组整合数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

A123	1	66
B123	2	999
C123	3	555
A123	5	555
A123	6	6666

各位，R中使用什么函数能从第一个数据框中，按照第一列分组，取第二列最小值，第三列最大值，得到第二个数据框

A123	1	6666
B123	2	999
C123	3	555

求指教

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：数据框 求指教 最大值 最小值 最大值

1. require(dplyr)
   
2. sample_Data <- data.frame(X1=c(rep("A123",3),"B123","C123"),
   
3.                           X2=rnorm(5,6,3),
   
4.                           X3=runif(5,min=6,max=10))
   
5. sample_Data%>%
   
6.   group_by(X1)%>%
   
7.   summarise(X2_Min=min(X2),
   
8.             X3_Max=max(X3))

复制代码

try try

直接用plyr包
sample <- data.frame(x1 = c("A123","B123","C123","A123","A123"), x2 = c(1,2,3,5,6), x3 = c(66,999,555,555,6666))
> sample
    x1 x2  x3
1 A123  1  66
2 B123  2 999
3 C123  3 555
4 A123  5 555
5 A123  6 6666
> library(plyr)
> ddply(sample, .(x1), summarize, min = min(x2), max = max(x3))
    x1 min max
1 A123   1 6666
2 B123   2 999
3 C123   3 555

felixzhao123 发表于 2016-8-16 12:57

非常感谢

剑气箫心123 发表于 2016-8-16 15:55
直接用plyr包
sample  sample
    x1 x2  x3

非常感谢

data.table解

1. DT <- data.frame(x1 = c("A123","B123","C123","A123","A123"),
   
2.                      x2 = c(1,2,3,5,6),
   
3.                      x3 = c(66,999,555,555,6666))
   
4. library(data.table)
   
5. DT <- as.data.table(DT)
   
6. DT
   
7. DT[, list(min(x2), max(x3)), by = x1]

复制代码

bbslover 发表于 2016-8-18 08:30
data.table解

好的，我学一下这个包，谢谢