#install.packages("RColorBrewer")

#install.packages("wordcloud")

library(wordcloud)

library(RColorBrewer)

palete <- brewer.pal(3,"Set2")

?brewer.pal

display.brewer.all()