# NOT RUN {
data(metMUD1)
# removeGroup
sumSpectra(metMUD1)
trmt <- removeGroup(metMUD1, rem.group = "Cntrl")
sumSpectra(trmt)
# removeSample
# Removes the 20th spectrum/sample:
new1 <- removeSample(metMUD1, rem.sam = 20)
# Removes one spectrum/sample with this exact name:
new2 <- removeSample(metMUD1, rem.sam = "metMUD1_20")
# }
Run the code above in your browser using DataLab