EP
я бы сначала разбил переменную по разделителю (separate) и потом транспонировал, убрав NA (gather)
Size: a a a
2021 February 15
A
unlist в помощь, наверное
AP
Какие слова гуглить?
strsplit
ИП
tidyr::separate_rows()
AS
strsplit
Пфффф... как-то неэлегантно.
AS
Иван Поздняков
tidyr::separate_rows()
Звучит незнакомо. Сейчас гляну, что это такое.
AP
df[, .(titlet = unlist(strsplit(title, ",", fixed = TRUE))), by = .(cnt)]
ИП
Звучит незнакомо. Сейчас гляну, что это такое.
вот ровно то, что нужно.
Конкретно:
separate_rows(df, title, sep = «,»)
Конкретно:
separate_rows(df, title, sep = «,»)
EP
но это же только первый шаг? потом эту кучу переменных нужно собрать в вертикальный датасет.
AP
Пфффф... как-то неэлегантно.
Элегантнее некуда, в стиле data.table )))
AS
Элегантнее некуда, в стиле data.table )))
Спасибо, но я пока не настолько отчаялся.
A
dt[, .(unlist(title)), by = cnt] вот кошерное решение
ИП
df[, .(titlet = unlist(strsplit(title, ",", fixed = TRUE))), by = .(cnt)]
а при повторяющихся cnt будет работать?
A
df[, .(titlet = unlist(strsplit(title, ",", fixed = TRUE))), by = .(cnt)]
Так это ж то же самое
AP
Иван Поздняков
а при повторяющихся cnt будет работать?
А там и так повторяется к примеру 7
A
Только я думал, что внутри уже готовый список
A
Можно вместо cnt уникальный айдишник добавить, тогда точно проблем не будет
ИП
> df[, .(titlet = unlist(strsplit(title, ",", fixed = TRUE))), by = .(cnt)] Ошибка в .(titlet = unlist(strsplit(title, ",", fixed = TRUE))) : не могу найти функцию "."
A
Это таблица data.table должна быть
ИП
ой, да, спасибо, df у меня другая переменная