Разбить столбец символьных векторов и вернуть список

Question

У меня есть следующий dataframe :

df <- data.frame(Sl.No = c(1:6),
                 Variable = c('a', 'a,b', 'a,b,c', 'b', 'c', 'b,c'))


   Sl.No   Variable
   1         a
   2         a,b
   3         a,b,c
   4         b
   5         c
   6         b,c

Я хочу отделить уникальные значения в столбце переменной как список

myList <- ("a", "b", "c")

Я попробовалследующий код:

separator <- function(x) strsplit(x, ",")[[1]][[1]]
unique(sapply(df$Variable, separator))

Это, однако, дает мне следующий вывод:

"a"

Я прошу некоторую помощь.Я искал, но, кажется, не смог найти ответ на этот вопрос.

Answer 1

Мы можем разделить столбец Variable на ",", получить все значения и выбрать только значения unique.

unique(unlist(strsplit(df$Variable, ",")))
#[1] "a" "b" "c"

Если в столбце Variable указан коэффициент, преобразуйте его в символ перед использованием strsplit.