knitr::opts_chunk$set(echo = FALSE) data("texts") data("guris")
res <- strat::makeWordCloud(guris, type = "url", max.words = 50, colorPalette = "Set1")
head(res$freqTable, 5)
res <- strat::makeWordCloud(texts$anal, type = "text", max.words = 50, colorPalette = "PiYG")
head(res$freqTable, 5)
res <- strat::makeWordCloud(texts$serv, type = "text", max.words = 50, colorPalette = "RdBu")
head(res$freqTable, 5)
res <- strat::makeWordCloud(paste(texts$anal, texts$serv, collapse = ' '), type = "text", max.words = 50, colorPalette = "Purples")
head(res$freqTable, 5)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.