# \donttest{
if (interactive()) {
get_lemmas("dog", pos = "n", sensenum = 1) %>% get_outdegrees(linkid = 1)
get_lemmas("dog", pos = "n", sensenum = 1) %>% get_hyponyms()
get_lemmas("nice", pos = "a", sensenum = 1) %>% get_antonyms()
}
# }
Run the code above in your browser using DataLab