如何在 R 中使用自定义调色板词云设置颜色数量

问：

我正在尝试在 R 中构建一个由一些调查答案组成的词云，该词云按频率着色，但使用我被要求使用的自定义调色板。调色板有 8 种颜色，但无论我尝试什么，它似乎只使用了其中的 5 或 6 种。我希望能够玩我使用的数量，看看最好的结果，（例如将其设置为 4 或 7），但问题已经超出了我自己微薄的技能。谁能告诉我最好的解决方案是什么？

这是我开始的

library(tidytext)
library(tidyverse)
library(wordcloud)

#This is the custom palette I want to use
Mycols <- c(
  "#313d48",
  "#46d9e8",
  "#ffa900",
  "#ff5c00",
  "#00ba5a",
  "#ab81bf",
  "#c6006f",
  "#0a28c8")



#Dummy data, but not wildly different to my actual data
answers <- billboard %>%
  select(track) %>%
  unnest_tokens(word, track) %>%
  anti_join(stop_words) %>%
  filter(!is.na(word)) %>%
  group_by(word) %>%
  count() %>%
  arrange(desc(n))

set.seed(559923)
wordcloud(words = answers$word, 
          freq = answers$n, 
          random.order = FALSE,
          min.freq = 1,
          rot.per = 0.35, 
          colors = Mycols)

我找到了使用 RColorBrewer 来设置使用的颜色数量的示例，但它们无济于事，因为我必须使用自定义调色板。我找到的其他答案是根据另一个变量设置颜色，这不是我想做的，所以现在我有点难住了。感谢所有的帮助。