toks1 <- tokens(data_corpus_inaugural[1:5])
toks2 <- tokens(data_corpus_inaugural[21:25])
toks3 <- toks1 + toks2
toks1 <- tokens(data_corpus_inaugural[1:5])
toks2 <- tokens(data_corpus_inaugural[21:25])
toks3 <- tokens(data_corpus_inaugural[41:45])
summary(c(toks1, toks2, toks3))
Run the code above in your browser using DataLab