Extrahieren Sie eine bestimmte Anzahl von Zeilen im Datenrahmen basierend auf der Bedingung in R?

Question

Sagen wir, ich habe einen Datenrahmen

Group Pos Score 
A  V 82 
A  V 72 
A  W 95 
A  W 92 
A  W 65 
A  W 61 
A  X 82 
A  X 80 
A  X 70 
B  V 88 
B  V 77 
B  W 95 
B  W 91 
B  W 85 
B  W 71 
B  X 88 
B  X 83 
B  X 78 
... 
#this data frame has groups with values C, D, E, etc also 

Lasst uns sagen, dass ich für jeden Group die obere Reihe von Partituren halten wollen, und jede Pos. Zum Beispiel, sagen wir, ich die Besten 1 Score für Pos=V, Top-3 Score s für Pos=W und Top 2 Score s von Pos=X

Deshalb möchte ich die Datenrahmen aussehen

Group Pos Score 
A  V 82 
A  W 95 
A  W 92 
A  W 65 
A  X 82 
A  X 80 
B  V 88 
B  W 95 
B  W 91 
B  W 85 
B  X 88 
B  X 83 

behalten möchten Wie kann ich das in R machen?

Answer 1

Wir

versuchen

v1 <- unique(df1$Pos) 
Map(function(x,y) 
    filter(df1, Pos==x) %>% 
     group_by(Group) %>% 
     top_n(y, wt = Score), v1, c(1, 3, 2)) %>% 
    bind_rows()