Объединение столбцов и упорядочение их содержимого [дубликат]

Dec 02 2020

У меня есть фрейм данных с именем, issuesdataкоторый я создал из большего фрейма,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

У меня две цели:

  1. Объединить эти столбцы вместе , так что есть четвертый столбец , содержащий все вопросы в одной строке символов (имя столбца: allissues)
  2. Текст выпусков в allissuesалфавитном порядке.

Например, строка 2 allissuesостанется в форме, economic unificationно будет одной строкой символов. Строка 4 будет Aviation Transportation, а строка 6 economic humanrights slavery.

Как мне это сделать?

Ответы

1 RonakShah Dec 02 2020 at 13:01

Построчно отбросьте значения NA, отсортируйте их и вставьте вместе.

В базе R:

issuesdata$combine <- apply(issuesdata, 1, function(x) 
                            toString(sort(na.omit(x))))

Или с 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