R извлечь Ith наименьшее значение по значениям одного столбца, для всех уровней другого столбца

Question

у меня есть этот фрейм данных:

> df 
    c1 c2 
1 1 b 
2 2 a 
3 3 a 
4 4 a 
5 3 a 
6 2 b 
7 6 a 
8 4 b 
9 8 b 
10 7 a 

Таким образом, для я = 3, выходной сигнал должен быть 3-низкие значения "c1" для обоих уровней "c2"

c1 c2 
    3 a 
    4 b 

Answer 1

у вас есть различные варианты, один может быть tapply

> df<-read.table(text=" c1 c2 
1 1 b 
2 2 a 
3 3 a 
4 4 a 
5 3 a 
6 2 b 
7 6 a 
8 4 b 
9 8 b 
10 7 a") 
> df 
    c1 c2 
1 1 b 
2 2 a 
3 3 a 
4 4 a 
5 3 a 
6 2 b 
7 6 a 
8 4 b 
9 8 b 
10 7 a 
> tapply(df$c1, df$c2, function(x) sort(x)[3]) 
a b 
3 4 

Или, используя plyr пакет, вы можете:

> library(plyr) 

> ddply(df, .(c2), summarise, c1=sort(c1)[3]) 
    c2 c1 
1 a 3 
2 b 4 

Answer 2

Использование data.table

library(data.table) 
dt<-data.table(df1) 
dt[,sort(c1)[3],by=c2] 
    c2 V1 
1: b 4 
2: a 3 

Answer 3

По существу вариацию на тему:

aggregate(c1 ~ c2, df, function(x) sort(x)[3]) 
# c2 c1 
# 1 a 3 
# 2 b 4