基于findAssocs创建wordcloud

Question

所以我设法从PDF文件创建Wordcloud。
我还设法根据排名最高的单词（在本例中为 dvcsl ）找到所有关联人。
我似乎无法弄清的是：如何制作一个在中间显示 dvcsl 及其周围所有联系人的wordcloud？

# Create WordCloud
v <- sort(rowSums(dtm),decreasing = TRUE)
d <- data.frame(word = names(v),freq = v)
set.seed(1000)
wordcloud(words = d$word, freq = d$freq, min.freq = 50, max.words=20, random.order=FALSE, rot.per=0.01, colors=brewer.pal(8, "Dark2"))

# Find associates
dtm <- TermDocumentMatrix(docs)
getFreq <- findFreqTerms(dtm, lowfreq = 80)
myAssociates <- findAssocs(dtm, terms = "dvcsl", corlimit = 0.4)

有人可以指出我正确的方向吗？ 提前Tnx