Extract keywords from a description column – tidyverse

I am new to R Studio, and have been thrown into the ocean for a beginner like me….

Scenario:
I have a description column, from this column i need to extract keywords. create a new column next to the description column and save this key phrases related to the description.
this is an example of how the extraction must happen.

my code is not doing much though, see snippet below:

library(tidyverse)
my_data = read.delim(“TEST_CSV_.csv”)
head(my_data)

install.packages(“tm”)
install.packages(“tidytext”)
library(tm)
library(tidytext)

my_data <- my_data %>%
mutate(description = tolower(description), # Convert text to lowercase
description = removePunctuation(description), # Remove punctuation
description = removeNumbers(description), # Remove numbers
# description = stripWhitespace(description),
) # Remove extra whitespaces

Any help, or advice I will really appreciate that