fixed typo in name of find disagreement R script