Я попробовал это со следующим кодом, но почему-то это не сработало для меня:
x4 - это кадр данных, n1 строка символов, а n2 - количество импульсов на слово.
hchart(x4 ,"wordcloud", hcaes(name = "n1", weight = "n2"))
В старшей строке есть функция для облака слов, следуйте этому коду
data(reuters, package = "kernlab") text = paste( reuters[[1]]) textcld <- text %>% map(str_to_lower) %>% reduce(str_c) %>% str_split("\\s+") %>% unlist() %>% data_frame(word = .) %>% count(word, sort = TRUE) %>% anti_join(tidytext::stop_words) hchart(textcld, "wordcloud", hcaes(name = word, weight = log(n)))
И должен получить что-то вроде изображения ниже: введите описание изображения здесь