Zusammenführen von Spalten und Alphabetisieren ihres Inhalts [Duplikat]
Dec 02 2020
Ich habe einen Datenrahmen namens namens issuesdata
, den ich aus einem größeren Rahmen erstellt habe.clean.data
issue1 <- as.vector(clean.data$issue1) issue2 <- as.vector(clean.data$issue2)
issue3 <- as.vector(clean.data$issue3)
issuesdata <- data.frame(issue1, issue2, issue3)
issuesdata %>% dplyr::slice(10:15)
issue1 issue2 issue3
1 economic <NA> <NA>
2 economic unification <NA>
3 economic <NA> <NA>
4 transportation aviation <NA>
5 justice <NA> <NA>
6 slavery economic humanrights
Ich habe zwei Ziele:
- Merge diese Spalten zusammen , so dass es eine vierte Spalte alle Probleme in einer Zeichenkette , die (Spaltenname:
allissues
) - Der Text der Ausgaben in
allissues
ist alphabetisch sortiert
Zum Beispiel allissues
würde Zeile 2 von in der Form bleiben, economic unification
aber eine Zeichenfolge sein. Zeile 4 wäre Aviation Transportation
, während Zeile 6 ist economic humanrights slavery
.
Wie mache ich das?
Antworten
1 RonakShah Dec 02 2020 at 13:01
Legen Sie NA-Werte zeilenweise ab, sortieren Sie sie und fügen Sie sie zusammen.
In Basis R:
issuesdata$combine <- apply(issuesdata, 1, function(x)
toString(sort(na.omit(x))))
Oder mit dplyr
:
library(dplyr)
issuesdata %>%
rowwise() %>%
mutate(combine = toString(sort(na.omit(c_across()))))
# issue1 issue2 issue3 combine_data
# <chr> <chr> <chr> <chr>
#1 economic NA NA economic
#2 economic unification NA economic, unification
#3 economic NA NA economic
#4 transportation aviation NA aviation, transportation
#5 justice NA NA justice
#6 slavery economic humanrights economic, humanrights, slavery