是否可以使用高级章程创建词云？

Question

我用下面的代码尝试了一下，但是不知怎么对我不起作用：

x4是一个数据帧，n1是一个字符串，n2是每个单词的计数数。

for (Object object : objects) {
    System.out.println(String.valueOf(object));
}

objects.clear();

Answer 1

highcharter中有一个词云功能，请遵循此代码

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)))

并且应该得到类似下面的图片： enter image description here