add functions to convert from R/qtl genotype input