added R scripts for genotype QC analysis