if (FALSE) {
x <- c("i like", "i want. thet them .", "I am ! that|", "", NA,
"they,were there", ".", " ", "?", "3;", "I like goud eggs!",
"i 4like...", "\\tgreat", "She said \"yes\"")
check_text(x)
print(check_text(x), include.text=FALSE)
y <- c("A valid sentence.", "yet another!")
check_text(y)
}
Run the code above in your browser using DataLab