如何从具有 2 个条件的 data.frame 中选择行

Question

我有一个汇总表：

> aggdata[1:4,]
  Group.1 Group.2         x
1       4    0.05 0.9214660
2       6    0.05 0.9315789
3       8    0.05 0.9526316
4      10    0.05 0.9684211

当我有 Group.1 和 Group.2 的值时，如何选择 x 值？

我试过了：

aggdata[aggdata[,"Group.1"]==l && aggdata[,"Group.2"]==lamda,"x"]

但这会回复所有的 x。

更多信息： 我想这样使用：

table = data.frame();
for(l in unique(aggdata[,"Group.1"])) {
    for(lambda in unique(aggdata[,"Group.2"])) {
        table[l,lambda] = aggdata[aggdata[,"Group.1"]==l & aggdata[,"Group.2"]==lambda,"x"]
    }
}

任何更容易并给出这个结果的建议我都很感激！

Answer 1

有一个关于子集 R 数据框的非常有用的文档： http://www.ats.ucla.edu/stat/r/modules/subsetting.htm

以下是相关摘录：

使用多个子集的行 条件语句：没有 限制多少逻辑语句 可以结合起来实现 所需的子集。数据 框架 x.sub1 仅包含 观察值 变量 y 大于 2 并且 变量 V1 更大 大于 0.6。

x.sub1 <- subset(x.df, y > 2 & V1 > 0.6)

Answer 2

最简单的解决方案是将代码中的“&&”更改为“&”。

> aggdata[aggdata[,"Group.1"]==6 & aggdata[,"Group.2"]==0.05,"x"]
[1] 0.9315789

我首选的解决方案是使用子集（）：

> subset(aggdata, Group.1==6 & Group.2==0.05)$x
[1] 0.9315789

Answer 3

使用 & 而不是 &&。后者只计算每个向量的第一个元素。

更新：回答第二部分，使用 reshape 包。这样的事情会做到：

tablex <- recast(aggdata, Group.1 ~ variable * Group.2, id.var=1:2)
# Now add useful column and row names
colnames(tablex) <- gsub("x_","",colnames(tablex))
rownames(tablex) <- tablex[,1]
# Finally remove the redundant first column
tablex <- tablex[,-1]

有更多使用 reshape 经验的人可能有更简单的解决方案。

注意：不要使用 table 作为变量名，因为它与 table() 函数冲突。