R中的文本相似性

我想知道如何使用数据帧中的R来执行文本相似性。我有下面的代码，当我直接输入要比较的内容时，它工作得非常好，但是我很难让它与我的数据框中包含的字一起工作。我想比较我的数据框中的所有单词对。有什么想法吗？提前谢谢

library(textcat)

?textcat_xdist

round(textcat_xdist(
list(
   text1="hello there",
   text2="why hello there",
   text3="totally different"
   ),
 method="cosine"),
3)


Data <- data.frame(
  X = sample(1:4),
  Word = sample(c("hello", "hellow", "hellloooo", "different"), 4, replace = TRUE)
)

库（textcat）
？文本目录
圆形（文本目录）(
名单(
text1=“你好”，
text2=“为什么在那里打招呼”，
text3=“完全不同”
),
方法=“余弦”），
3)
数据请向我们展示你的Data.frame（一部分）。我们需要一个你遇到的问题的例子，而不是一个有效的例子。你说“不能让它工作”是什么意思？谢谢你的回答。我在问题中添加了更多细节。