wordcloud

library(readxl)
Book3 <- read_excel("Book3.xlsx")
View(Book3)


# Load the required library
library(wordcloud2)
library(wordcloud)

## Loading required package: RColorBrewer

# Create the word cloud
wordcloud2(data = Book3)

wordcloud(Book3$word, Book3$freq)