conversation <- data.frame(
processed_text = c("The cat sat on the mat", "The dog chased the cat",
"The mat was comfortable", "The cat liked the mat")
)
result <- topic_sim_seq(conversation, method = "lda", num_topics = 2, window_size = 2)
print(result)
Run the code above in your browser using DataLab