Nothing
testthat::context('Feature associations')
test_that("feature associations", {
library(corpustools)
tc = create_tcorpus(sotu_texts)
topf = feature_associations(tc, 'token', 'war')
topf
expect_equal(round(topf$ratio[topf$feature == 'terror'], 2), 13.93)
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.