# NOT RUN {
# import some data
file_location <- system.file(
"extdata",
"avian_ecology_bibliography.ris",
package = "revtools")
x <- read_bibliography(file_location)
# construct a document-term matrix
x_dtm <- make_dtm(x$title,
stop_words = revwords())
# Note that make_dtm calls revwords by default, so this is technically redundant
# }
Run the code above in your browser using DataLab