August 2017
Intermediate to advanced
288 pages
8h 6m
English
Here is how we go about preprocessing:
load_packages=c("janeaustenr","tidytext","dplyr","stringr","ggplot2","wordcloud","reshape2","igraph","ggraph","widyr","tidyr")
lapply(load_packages, require, character.only = TRUE)
Pride_Prejudice <- data.frame("text" = prideprejudice,
"book" = "Pride and Prejudice",
"line_num" = 1:length(prideprejudice),
stringsAsFactors=F)