我理解如何对数据框进行排序:
df[order(df$Height),]
我理解如何过滤(或子集)匹配某个谓词的数据框:
df[df$Weight > 120,]
但如何对和过滤器进行排序(例如,按高度排序并按重量过滤)?
答案 0 :(得分:14)
分两步进行
df1 <- df[df$weight > 120, ]
df2 <- df1[order(df1$height), ]
或者如果你必须一步到位 - 但它确实不是更清洁。
数据优先:
R> set.seed(42)
R> df <- data.frame(weight=rnorm(10, 120, 10), height=rnorm(10, 160, 20))
R> df
weight height
1 133.7 186.1
2 114.4 205.7
3 123.6 132.2
4 126.3 154.4
5 124.0 157.3
6 118.9 172.7
7 135.1 154.3
8 119.1 106.9
9 140.2 111.2
10 119.4 186.4
这样做的一种方法是双子集:
R> subset(df, weight > 120)[order(subset(df, weight > 120)$height),]
weight height
9 140.2 111.2
3 123.6 132.2
7 135.1 154.3
4 126.3 154.4
5 124.0 157.3
1 133.7 186.1
R>
我会选择两步。
答案 1 :(得分:12)
包data.table
允许您在一行代码中进行此操作:
借用Dirk Eddelbuettel的例子,设置了一些数据:
set.seed(42)
df <- data.frame(weight=rnorm(10, 120, 10), height=rnorm(10, 160, 20))
将data.frame
转换为data.table
和重量子集,按高度排序:
library(data.table)
dt <- data.table(df)
dt[weight>120][order(height)]
weight height
[1,] 140.1842 111.1907
[2,] 123.6313 132.2228
[3,] 135.1152 154.3149
[4,] 126.3286 154.4242
[5,] 124.0427 157.3336
[6,] 133.7096 186.0974
答案 2 :(得分:6)
df1 <- df[order(df$height), ][df$weight > 120, ]
只需确保将订单放在过滤器之前。