arrangiare() non funziona sul frame di dati raggruppati

Question

Assumendo che abbia il seguente codice. Nell'ultimo passaggio, dove cerco di organizzarlo, il codice non funziona e il data frame continua ad essere disposto in ordine crescente entro il cyl.

library(dplyr) 
# create a grouped data frame 
df <- group_by(mtcars,cyl) 
# rank car from best mpg to worst for every cyl 
df <- mutate(df,rank = row_number(mpg)) 
# top 3 best mpg for each cyl 
df <- filter(df,rank <= 3) 
# arrange by the number of cyl 
df <- arrange(df,desc(cyl), rank) 

Qualche idea sul perché questo sta accadendo?

Answer 1

Non funziona perché è necessario ungroup() i dati prima di disporre di cyl. Il codice che stai utilizzando tenta di ordinare la colonna cyl mentre è ancora raggruppata per cyl. Poiché tali valori sono tutti uguali (all'interno di ciascun gruppo), nulla cambia.

Per disporre l'intero dato entro il cyl dopo il posizionamento, è necessario rimuovere prima il raggruppamento, quindi è possibile eseguire nuovamente arrange().

library(dplyr) 

group_by(mtcars, cyl) %>%    ## group by cylinder 
    mutate(rank = row_number(mpg)) %>% ## rank by mpg 
    filter(rank <= 3) %>%    ## top three for each cyl 
    arrange(rank) %>%     ## arrange each group by rank 
    ungroup() %>%      ## remove grouping 
    arrange(desc(cyl))     ## arrange all by cylinder (descending) 

# mpg cyl disp hp drat wt qsec vs am gear carb rank 
# 1 10.4 8 472.0 205 2.93 5.250 17.98 0 0 3 4 1 
# 2 10.4 8 460.0 215 3.00 5.424 17.82 0 0 3 4 2 
# 3 13.3 8 350.0 245 3.73 3.840 15.41 0 0 3 4 3 
# 4 17.8 6 167.6 123 3.92 3.440 18.90 1 0 4 4 1 
# 5 18.1 6 225.0 105 2.76 3.460 20.22 1 0 3 1 2 
# 6 19.2 6 167.6 123 3.92 3.440 18.30 1 0 4 4 3 
# 7 21.4 4 121.0 109 4.11 2.780 18.60 1 1 4 2 1 
# 8 21.5 4 120.1 97 3.70 2.465 20.01 1 0 3 1 2 
# 9 22.8 4 108.0 93 3.85 2.320 18.61 1 1 4 1 3 

Come nota a margine, consiglio di prendere in considerazione utilizzando la funzione %>% per il concatenamento queste chiamate insieme come sarà notevolmente ridurre le assegnazioni fatte con <-.