Skip to contents

Persist a corpus to disk as RDS and reload it.

Usage

sm_save_corpus(corpus, path, compress = "xz")

sm_load_corpus(path)

Arguments

corpus

An sm_corpus object.

path

File path for saving.

compress

Compression type passed to saveRDS().

Value

For sm_save_corpus, the path invisibly. For sm_load_corpus, an sm_corpus object.

Examples

corpus <- sm_example_corpus(n_works = 10)
path <- tempfile(fileext = ".rds")
sm_save_corpus(corpus, path)
#>  Corpus saved to /tmp/RtmpIQMgiF/file237011f4394.rds
loaded <- sm_load_corpus(path)
nrow(loaded$works)
#> [1] 10