findSubstitutions.R updated
 hmm
hmm