powered by
## S3 method for class 'ngram': babble(ng, genlen=150, seed=getseed())
ngram
library(ngram) str <- "A B A C A B B" ng <- ngram(str) babble(ng, genlen=5, seed=1234)
Run the code above in your browser using DataLab