added r script to calculate raup-crick dissims