context("Factorial Preprocessing")
test_that("Small example works", {
# load data
documents <- quanteda::data_corpus_inaugural
# use last 10 documents for example
documents <- corpus_subset(documents,Year > 1980)
# pull out the text
documents <- quanteda::texts(documents)
# run preprocessor
factorial_prep <- factorial_preprocessing(documents,
use_ngrams = FALSE)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.