## Not run:
# x <- c("Mr. Jones isn't going.",
# "Check it out what's going on.",
# "He's here but didn't go.",
# "the robot at t.s. wasn't nice",
# "he'd like it if i'd go away")
#
# replace_contraction(x)
# ## End(Not run)
Run the code above in your browser using DataLab