## Not run:
# data(yeast)
# attach(yeast)
# triggerobj <- trigger.build(marker = marker, exp = exp,
# marker.pos = marker.pos, exp.pos = exp.pos)
# triggerobj <- trigger.loclink(triggerobj, window.size = 30000)
# trigger.obj <- trigger.net(triggerobj, Bsec = 100)
# detach(yeast)
# ## End(Not run)
Run the code above in your browser using DataLab