data.frame中增加一列为组别编号

请问如果根据组别group生成a,b两列，谢谢。
group        a        b
a        1        1
a        1        2
a        1        1
b        2        2
b        2        3
b        2        4
b        2        5
c        3        1
c        3        2

1. df<-data.frame(group=c(rep("a",3),rep("b",4),rep("c",2)))
   
2. df<-transform(df, a=as.integer(group))
   
3. index<-function(x){return(c(1:length(x)))}
   
4. df<-transform(df,b=unlist(tapply(a,group,index)))

复制代码

是不是这样？

data[data$group=='a',]

万人往LVR 发表于 2015-12-30 15:51
data[data$group=='a',]

原始数据只有group这列，生成a列和b列。

万人往LVR 发表于 2015-12-30 15:51
data[data$group=='a',]

原始数据只有group这列，生成a列和b列。

万人往LVR 发表于 2015-12-30 15:51
data[data$group=='a',]

原始数据只有group这列，生成a列和b列。

1. library(plyr)
   
2. library(magrittr)
   
3. library(rlist)
   
4. df %>%
   
5.   mutate(a = unclass(factor(group))) %>%
   
6.   dlply("group", .fun = mutate, b = seq_len(length(group))) %>%
   
7.   list.stack

复制代码

split(data, data$group)

ryoeng 发表于 2015-12-30 18:38
倘若是数据太多的话，建议使用 plyr，dplyr来处理，整洁和简结易看。

其实这个代码我没有看懂~~