Я успешно генерирую облако слов, но я не знаю, почему я не могу их раскрасить на основе группы. Вот код:
Облако слов
set.seed(1234)
wordcloud(words = data$Name, freq = data$freq, min.freq = 1,
max.words=100, random.order=FALSE, rot.per=0.35,
scale = c(4,0.8), random.color = FALSE,
colors=brewer.pal(8, "Dark2")[factor(data$group)])
set.seed(1)
d1 <- data.frame(word=c(stringi::stri_rand_strings(20, 5)), freq=c(sample.int(20,10,100)))
d1$group <- "group1"
d1$word <- paste("g1" ,d1$word, sep = "")
d2 <- data.frame(word=c(stringi::stri_rand_strings(20, 5)),freq=c(sample.int(20,10,100)))
d2$group <- "group2"
d2$word <- paste("g2" ,d2$word, sep = "")
d <- rbind(d1,d2)
# word cloud
set.seed(1234)
wordcloud(words = d$word, freq = d$freq, min.freq = 1,
max.words=100, random.order=FALSE, rot.per=0.35,
scale = c(3,0.5), random.color = FALSE,
colors=brewer.pal(8, "Dark2")[factor(d$group)])
также, когда при построении слова облака я не могу найти все экземпляры, особенно при масштабировании, как я могу убедиться, что они могут быть очень плотными, чтобы график выглядел как облако?
![enter image description here](https://i.stack.imgur.com/H0r2v.jpg)