read.cross for doubled haploids in qtlcart format