# NOT RUN {
data(Metabolites)
data(Transcripts)
associations <- associateData(Metabolites[,1:2],Transcripts[,c(1:100)])
#if you only define feature1 or feature2 if will plot all associations
plot(associations,Metabolites,Transcripts,feature1=1,withShift = TRUE)
#if you define feature1 and feature2 it will only plot these two profiles
plot(associations,Metabolites,Transcripts,feature1="Metabolite 1",feature2="Transcript 2")
# }
Run the code above in your browser using DataLab