library(ctl)
data(ath.metabolites) # Arabidopsis Thaliana data set
data(ath.result) # Arabidopsis Thaliana CTL results
regions <- CTLregions(ath.result, ath.metab$map)
Run the code above in your browser using DataLab