## Data obtained from http://genomics-pubs.princeton.edu/StarvationMetabolomics/Download.shtm
data(StarvationData)
## Computes the eigensystem for the actual data
eigensystem <- compute(StarvationData)
## Excludes the eigenfeatures representing steady-state intensity
eigensystem <- exclude(eigensystem)
## Find the projection of the data onto eigenfeature 1 and 2
projection <- project(eigensystem)
## Project the data onto eigenfeature 3 and 4
projection <- project(eigensystem, axes=c(4,3))
Run the code above in your browser using DataLab