wide_result %>% select(contains("AT"), contains("CH"), contains("HUN"), contains("JP"), contains("USA"))
3 Réponses :
Voici une façon de le faire. Fondamentalement, nous mettons le nom des données dans un Tibble, extrayons la partie du nom après le _ code> (si possible), puis trier par ce texte extrait.
Utilisation de la base R:
df[c(1, order(sub(".*_", "", names(df)[-1])) + 1)]
Génial, même si c'est à Base R ;-)
Si vous voulez vraiment du dplyr code>, vous pouvez utiliser
SELECT () code> au lieu de
[(() code> avec
df%>% Select (c ( 1, ordre (sous (". * _", "", Noms (df) [- 1])) + 1)) code>
Vous pouvez utiliser dplyr select_at code>: