r - ワードネットを使って同義語を抽出する

Question

私は現在、論文に取り組んでおり、R 言語でソリューションを実装しています。word-net辞書ライブラリを使用して同義語を見つけなければなりません。私は単一の単語に対して同義語を取得しますが、一連の単語に対してループを使用して同義語を取得しようとすると、「サブスクリプションは結合されていません」というエラーが表示されます.テキスト内の各単語に対して同義語を取得する方法を誰かが教えてくれれば親切ループを使用していますか、それを行う他の方法はありますか? ここに私が試しているコードがあります

*my_corpus <- "closure animal wrong carnivore herbivore meat omnivore veg wrong"
  for (j in seq(my_corpus))
    {
      if(initDict()) {
           filter <- getTermFilter("ExactMatchFilter", "my_corpus", TRUE)
           terms <- getIndexTerms("NOUN", 5, filter)
           getSynonyms(terms[[my_corpus]])
        }
    }

*