У меня есть такой фрейм данных:
Screen.name party users
1 A_Gloeckner SPD @MartinSchulz.
2 A_Gloeckner SPD @MartinSchulz
3 A_Gloeckner SPD @ManuelaSchwesig @sigmargabriel @nahles
4 a_grotheer SPD @SouthendRNLI
5 a_grotheer SPD @ribasdiego10
6 a_grotheer SPD @HBBuergerschaft
7 a_grotheer SPD @UniBremen…
Я хотел бы разделить третий столбец и сделать так, чтобы фрейм данных выглядел так:
Screen.name party mentioned_users
1 A_Gloeckner SPD @MartinSchulz.
2 A_Gloeckner SPD @MartinSchulz
3 A_Gloeckner SPD @ManuelaSchwesig
4 A_Gloeckner SPD @sigmargabriel
5 A_Gloeckner SPD @nahles
6 a_grotheer SPD @SouthendRNLI
7 a_grotheer SPD @ribasdiego10
8 a_grotheer SPD @HBBuergerschaft
9 a_grotheer SPD @UniBremen…
Я пробовал пока это: упоминание_polits_2017 = упоминание_политиков_2017 [, список (упоминание_политики_2017 = unlist (strsplit (упоминание_политики_2017, ","))), by = упоминание_политики_2017 $ Screen.name]
Но он показывает мне ошибку: «Ошибка в [.data.frame (упоминание_политиков_2017,, список (упоминание_политиков_2017 = unlist (strsplit (упоминание_политики_2017,:
неиспользованный аргумент (от = упоминание_политики_2017 $ Screen.name) "
Спасибо.
упоминание_политики_2017 = упоминание_политики_2017 [, список (упоминание_политики _2017 = исключить из списка (strspli t (упоминание_политики_201 7, ","))), автор = упоминание_ polits_2017 $ Screen.n ame]
@ Не могли бы вы обновить вопрос, указав, что вы сделали, и, возможно, результат? Это поможет всем.
Я уже изучал, где был дан ответ на этот вопрос. Я перепробовал почти все альтернативы. Но у меня проблема с самим фреймом данных. Строка, которую я хочу разделить, имеет странный формат, я думаю, проблема с разделителем. Вот, например, что показано для элемента 3-й строки: strsplit (упоминание_polits_2017 [3,3], "") [[1]] [1] "" "@ManuelaSchwesig" "" "@sigmargabriel" "" "@nahles "





Можешь попробовать
library(tidyverse)
df %>%
separate_rows(users, sep = " ")
Screen.name party users
1 A_Gloeckner SPD @MartinSchulz.
2 A_Gloeckner SPD @MartinSchulz
3 A_Gloeckner SPD @ManuelaSchwesig
4 A_Gloeckner SPD @sigmargabriel
5 A_Gloeckner SPD @nahles
6 a_grotheer SPD @SouthendRNLI
7 a_grotheer SPD @ribasdiego10
8 a_grotheer SPD @HBBuergerschaft
9 a_grotheer SPD @UniBremen
Данные
df <- structure(list(Screen.name = structure(c(1L, 1L, 1L, 2L, 2L,
2L, 2L), .Label = c("A_Gloeckner", "a_grotheer"), class = "factor"),
party = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "SPD", class = "factor"),
users = c("@MartinSchulz.", "@MartinSchulz", "@ManuelaSchwesig @sigmargabriel @nahles",
"@SouthendRNLI", "@ribasdiego10", "@HBBuergerschaft", "@UniBremen"
)), class = "data.frame", .Names = c("Screen.name", "party",
"users"), row.names = c(NA, -7L))
Что вы пробовали до сих пор?