data(USNAM_geno)
data(USNAM_map)
data(USNAM_pheno)
geno.off <- USNAM_geno[7:506, ]
geno.par <- USNAM_geno[1:6, ]
map <- USNAM_map
pheno <- USNAM_pheno
cross.ind <- substr(rownames(pheno), 1, 4)
par.per.cross <- cbind(unique(cross.ind), rep("B73", 5),
rownames(geno.par)[2:6])
mppData <- create.mppData(geno.off = geno.off, geno.par = geno.par,
map = map, pheno = pheno, cross.ind = cross.ind,
par.per.cross = par.per.cross)
Run the code above in your browser using DataLab