# NOT RUN {
x <- "This is Jon's dogs' 'bout there in a word Mike's re'y."
rm_nchar_words(x, 4)
ex_nchar_words(x, 4)
## Count characters (apostrophes and letters)
ex_nchar_words(x, 5, pattern = "@rm_nchar_words2")
## nchar range
rm_nchar_words(x, "1,2")
# }
# NOT RUN {
## Larger example
library(qdap)
ex_nchar_words(hamlet[["dialogue"]], 5)
# }
Run the code above in your browser using DataLab