# NOT RUN {
map <- qtl::sim.map()
pedigree <- f2Pedigree(1000)
cross <- simulateMPCross(map = map, pedigree = pedigree, mapFunction = haldane, seed = 1)
mappedCross <- mpcrossMapped(cross = cross, map = map)
reversedX <- reverseChromosomes(mappedCross, "X")
reversedX@map[["X"]]
mappedCross@map[["X"]]
# }
Run the code above in your browser using DataLab