代码之家 › 专栏 › 技术社区 › Adrian

R: 检查多个数据框基于重复行并重新组织数据

dataframe list r

Adrian · 技术社区 · 4 年前

mydata <- structure(list(X1 = c(1, 1, 1, 1, 1, 1), X2 = c(1, 4, 4, 3, 2, 
2), X3 = c(1, 2, 2, 3, 3, 3), X1 = c(-1, 1, 1, 1, -1, -1), X2 = c(1, 
-1, -1, 1, -1, -1), X3 = c(1, -1, 1, 1, -1, -1)), class = "data.frame", row.names = c(NA, 
-6L))

values <- data.frame(rbind(c(1, -3),
                           c(-99, 20),
                           c(1, 0),
                           c(0, 0),
                           c(-9, 0.3),
                           c(-99, 11)))

data.frame 是的, mydata ,和 values 我的数据

> mydata
  X1 X2 X3 X1 X2 X3
1  1  1  1 -1  1  1
2  1  4  2  1 -1 -1
3  1  4  2  1 -1  1
4  1  3  3  1  1  1
5  1  2  3 -1 -1 -1
6  1  2  3 -1 -1 -1

有5个独特的组:

#1 1 1 1 -1 1 1

1 4 2 1 -1 -1

#3 1 4 2 1 -1 1

#4 1 3 3 1 1 1

1 2 3 -1 -1 -1

> values
   X1   X2
1   1 -3.0
2 -99 20.0
3   1  0.0
4   0  0.0
5  -9  0.3
6 -99 11.0

因此,生成的列表可能如下所示:

> mylist
[[1]]
[1] 1 -3.0

[[2]]
[1] -99 20.0

[[3]]
[1] 1  0.0

[[4]]
[1] 0  0.0

[[5]]
     X1     X2
1    -9    0.3
2   -99   11.0

2 回复 | 直到 4 年前

Ronak Shah 4 年前

您可以按行粘贴这些值,并找出可用于 split 一排排的 values

val <- do.call(paste, c(mydata, sep = '-'))
group <- match(val, unique(val))
split(values, group)

#$`1`
#  X1 X2
#1  1 -3

#$`2`
#   X1 X2
#2 -99 20

#$`3`
#  X1 X2
#3  1  0

#$`4`
#  X1 X2
#4  0  0

#$`5`
#   X1   X2
#5  -9  0.3
#6 -99 11.0

推荐文章

Dave · 如何在for循环中修改列表值

4 月前

geoscience123 · 如何计算R中一个表列与另一个数据帧的匹配数?

4 月前

matteo panaro · 向列表中添加项目

5 月前

Bioinfotec · 如何在R中将两个嵌套列表合并为一个列表?

5 月前

Jeffrey Van Laethem · 获取两个列表之间的所有元组排列

5 月前

Pernoctador · Python映射可以复制吗?我需要参考地图

5 月前

Bogaso · 从列表中返回与模式匹配的元素

5 月前

Daniel · 我有一组要排除的单词,我想检查输入的每个新单词是否完全包含在另一个单词中。我该怎么做?

5 月前

Tom Hunter · Excel验证列表中的条目

6 月前

Estrobelai · Python:数组中价格高于平均值的所有项目

9 月前