R/synonyms.R

In wordnet: WordNet Interface

Defines functions synonyms

Documented in synonyms

synonyms <-
function(word, pos)
{
    filter <- getTermFilter("ExactMatchFilter", word, TRUE)
    terms <- getIndexTerms(pos, 1L, filter)
    if (is.null(terms))
        character()
    else
        getSynonyms(terms[[1L]])
}

Try the wordnet package in your browser