library(MetProc)
#Read metabolomics data
metdata <- read.met(system.file("extdata/sampledata.csv", package="MetProc"),
headrow=3, metidcol=1, fvalue=8, sep=",", ppkey="PPP", ippkey="BPP")
#Get groups based on samples and pooled plasma
grps <- get_group(metdata,'PPP','X')
Run the code above in your browser using DataLab