An R script that checks how well two texts compares to another.