## Not run:
# data(yeast)
# attach(yeast)
# triggerobj <- trigger.build(marker = marker, exp = exp,
# marker.pos = marker.pos, exp.pos = exp.pos)
# crossfile <- trigger.export2cross(triggerobj)
# tt.pval <- trigger.trait(triggerobj, trait = "DSE1", cross = crossfile)
# causal.reg <- names(which(p.adjust(tt.pval, method = "fdr")<.05))
# detach(yeast)
# ## End(Not run)
Run the code above in your browser using DataLab