## plot spectrum of peptide NIDALSGMEGR
t <- FragmentPeptide("NIDALSGMEGR") # generate theoretical fragment ions
dev.new(width = 10, height = 5.5)
PeptideSpectrum(example.spectrum.peptide, t, label = "CID", xlim = c(100, 1200))
mtext("Peptide fragmentation mass spectrum", line = 1)
Run the code above in your browser using DataLab