## find path to a mzXML file
quantFile <- dir(system.file(package = "MSnbase", dir = "extdata"),
full.name = TRUE, pattern = "mzXML$")
## find path to a mzIdentML file
identFile <- dir(system.file(package = "MSnbase", dir = "extdata"),
full.name = TRUE, pattern = "dummyiTRAQ.mzid")
## create basic MSnExp
msexp <- readMSData(quantFile)
## add identification information
msexp <- addIdentificationData(msexp, identFile)
## access featureData; please note the multiple identification data
## for spectrum 1 (row 1)
fData(msexp)
idSummary(msexp)
Run the code above in your browser using DataLab