为行的所有唯一值子集数据框

时间:2015-06-19 14:17:44

标签: r frame subset data-manipulation

假设我有一个数据框:

id   value
1    "hi"
1    "hi"
1    "hi again"
1    "hi again"
2    "hello"
2    "hi"

现在我想为 id 列中的每个不同值获取一个单独的数据框。

df1
    id    value
    1     "hi"
    1     "hi"
    1     "hi again"
    1     "hi again"
and df2 
    id    value
    2     "hello"
    2     "hi"

如何在R中有效地实现这一目标?

我尝试过for循环

 df <- data.frame(id=c('1','1','1','1','2','2'),value=c('hi','hi','hi again','hi again','hello','hi'))
 for (i in 1:length(unique(df$id)))  {
         df1 <- df[unique(df$id)[i],]
         print(df1)
     }

但结果是

id value
1  1    hi
  id value
2  1    hi

我知道 apply 系列对数据框中的每一行都做了相同的操作,但在这种情况下我无法使用它们。可能是我错过了一些明显的东西?

1 个答案:

答案 0 :(得分:2)

根据上述评论,命令分别添加数据帧。

df_list <- split(df, df$id)
names(df_list) <- c("df1", "df2")
list2env(df_list, envir = .GlobalEnv)