BiocStyle::markdown()
Package: r Biocpkg("MsBackendMassbank")
Authors: r packageDescription("MsBackendMassbank")[["Author"]]
Compiled: r date()
library(Spectra) knitr::opts_chunk$set(echo = TRUE, message = FALSE) library(BiocStyle)
The Spectra
package provides a central infrastructure for the handling of Mass
Spectrometry (MS) data. The package supports interchangeable use of different
backends to import MS data from a variety of sources (such as mzML files). The
MsBackendMassbank
package allows import and handling MS/MS spectrum data from
Massbank. This vignette illustrates the usage
of the MsBackendMassbank
package to include MassBank data into MS data
analysis workflow with the Spectra
package in R.
The package can be installed with the BiocManager
package. To
install BiocManager
use install.packages("BiocManager")
and, after that,
BiocManager::install("MsBackendMassbank")
to install this package.
MassBank files (as provided by the Massbank github repository) store normally one library spectrum per file, typically centroided and of MS level 2. In our short example below, we load data from a file containing multiple library spectra per file or from files with each a single spectrum provided with this package. Below we first load all required packages and define the paths to the Massbank files.
library(Spectra) library(MsBackendMassbank) fls <- dir(system.file("extdata", package = "MsBackendMassbank"), full.names = TRUE, pattern = "txt$") fls
MS data can be accessed and analyzed through Spectra
objects. Below
we create a Spectra
with the data from these mgf files. To this end
we provide the file names and specify to use a MsBackendMassbank()
backend as source to enable data import. First we import from a single file
with multiple library spectra.
sps <- Spectra(fls[1], source = MsBackendMassbank(), backend = MsBackendDataFrame())
With that we have now full access to all imported spectra variables that we list below.
spectraVariables(sps)
The same is possible with multiple files, each containing a library spectrum.
sps <- Spectra(fls[-1], source = MsBackendMassbank(), backend = MsBackendDataFrame()) spectraVariables(sps)
By default the complete metadata is read together with the spectra. This can
increase loading time. The different metadata blocks can be skipped which
reduces import time. This requires to define an additional data.frame
indicating what shall be read.
# create data frame to indicate with metadata blocks shall be read. metaDataBlocks <- data.frame(metadata = c("ac", "ch", "sp", "ms", "record", "pk", "comment"), read = rep(TRUE, 7)) sps <- Spectra(fls[-1], source = MsBackendMassbank(), backeend = MsBackendDataFrame(), metaBlock = metaDataBlocks) # all spectraVariables possible in MassBank are read spectraVariables(sps) # all NA columns can be dropped spectraVariables(dropNaSpectraVariables(sps))
Besides default spectra variables, such as msLevel
, rtime
,
precursorMz
, we also have additional spectra variables such as the
title
of each spectrum in the mgf file.
sps$rtime sps$title
In addition we can also access the m/z and intensity values of each spectrum.
mz(sps) intensity(sps)
When importing a large number of mgf files, setting nonStop = TRUE
prevents the call to stop whenever problematic mgf files are
encountered.
sps <- Spectra(fls, source = MsBackendMassbank(), nonStop = TRUE)
An alternative to the import of the MassBank data from individual text files (which can take a considerable amount of time) is to directly access the MS/MS data in the MassBank MySQL database. For demonstration purposes we are using here a tiny subset of the MassBank data which is stored as a SQLite database within this package.
At present it is not possible to directly connect to the main MassBank
production MySQL server, thus, to use the MsBackendMassbankSql
backend it is
required to install the database locally. The MySQL database dump for each
MassBank release can be downloaded from here. This dump could be imported to
a local MySQL server.
To use the MsBackendMassbankSql
it is required to first connect to a
MassBank database. Below we show the R code which could be used for that - but
the actual settings (user name, password, database name, or host) will depend on
where and how the MassBank database was installed.
library(RMariaDB) con <- dbConnect(MariaDB(), host = "localhost", user = "massbank", dbname = "MassBank")
To illustrate the general functionality of this backend we use a tiny subset of the MassBank (release 2020.10) which is provided as an small SQLite database within this package. Below we connect to this database.
library(RSQLite) con <- dbConnect(SQLite(), system.file("sql", "minimassbank.sqlite", package = "MsBackendMassbank"))
We next initialize the MsBackendMassbankSql
backend which supports direct
access to the MassBank in a SQL database and create a Spectra
object from
that.
mb <- Spectra(con, source = MsBackendMassbankSql()) mb
We can now use this Spectra
object to access and use the MassBank data for our
analysis. Note that the Spectra
object itself does not contain any data from
MassBank. Any data will be fetched on demand from the database backend.
To get a listing of all available annotations for each spectrum (the so-called
spectra variables) we can use the spectraVariables
function.
spectraVariables(mb)
Through the MsBackendMassbankSql
we can thus access spectra information as
well as its annotation.
We can access core spectra variables, such as the MS level with the
corresponding function msLevel
.
head(msLevel(mb))
Spectra variables can also be accessed with $
and the name of the
variable. Thus, MS levels can also be accessed with $msLevel
:
head(mb$msLevel)
In addition to spectra variables, we can also get the actual peaks (i.e. m/z and
intensity values) with the mz
and intensity
functions:
mz(mb)
Note that not all spectra from the database were generated using the same instrumentation. Below we list the number of spectra for each type of instrument.
table(mb$instrument_type)
We next subset the data to all spectra from ions generated by electro spray ionization (ESI).
mb <- mb[mb$ionization == "ESI"] length(mb)
As a simple example to illustrate the Spectra
functionality we next calculate
spectra similarity between one spectrum against all other spectra in the
database. To this end we use the compareSpectra
function with the normalized
dot product as similarity function and allowing 20 ppm difference in m/z between
matching peaks
library(MsCoreUtils) sims <- compareSpectra(mb[11], mb[-11], FUN = ndotproduct, ppm = 40) max(sims)
We plot next a mirror plot for the two best matching spectra.
plotSpectraMirror(mb[11], mb[(which.max(sims) + 1)], ppm = 40)
We can also retrieve the compound information for these two best matching
spectra. Note that this compounds
function works only with the
MsBackendMassbankSql
backend as it retrieves the corresponding information
from the database's compound annotation table.
mb_match <- mb[c(11, which.max(sims) + 1)] compounds(mb_match)
Note that the MsBackendMassbankSql
backend does not support parallel
processing because the database connection within the backend can not be shared
across parallel processes. Any function on a Spectra
object that uses a
MsBackendMassbankSql
will thus (silently) disable any parallel processing,
even if the user might have passed one along to the function using the BPPARAM
parameter. In general, the backendBpparam
function can be used on any
Spectra
object to test whether its backend supports the provided parallel
processing setup (which might be helpful for developers).
sessionInfo()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.