massdataset: massdataset

#' 
#' setGeneric(name = "ms2_plot")
#' 
#' #' @title ms2_plot
#' #' @method ms2_plot ms2_data
#' #' @param spectrum1 ms2_data
#' #' @param spectrum2 Spectrum 2.
#' #' @param spectrum1_name Name of spectrum1
#' #' @param spectrum2_name Name of spectrum2
#' #' @param range.mz range.mz
#' #' @param ppm.tol ppm.tol
#' #' @param mz.ppm.thr mz.ppm.thr
#' #' @param xlab xlab.
#' #' @param ylab ylab.
#' #' @param col1 Color 1.
#' #' @param col2 Color 2.
#' #' @param title.size title.size
#' #' @param lab.size lab.size
#' #' @param axis.text.size axis.text.size.
#' #' @param legend.title.size legend.title.size
#' #' @param legend.text.size legend.text.size
#' #' @param interactive_plot Interactive plot or not.
#' #' @export
#' #' @rdname methods-ms2_data
#' #' @return ms2 matching plot
#' 
#' setMethod(f = "ms2_plot",
#'           signature(spectrum1 = "ms2_data"),
#'           function(spectrum1,
#'                    spectrum2,
#'                    spectrum1_name = "spectrum1",
#'                    spectrum2_name = "spectrum2",
#'                    range.mz,
#'                    ppm.tol = 30,
#'                    mz.ppm.thr = 400,
#'                    xlab = "Mass to charge ratio (m/z)",
#'                    ylab = "Relative intensity",
#'                    col1 = "red",
#'                    col2 = "black",
#'                    title.size = 15,
#'                    lab.size = 15,
#'                    axis.text.size = 15,
#'                    legend.title.size = 15,
#'                    legend.text.size = 15,
#'                    interactive_plot = FALSE) {
#'             if (missing(spectrum2)) {
#'               masstools::ms2_plot(spectrum1 = spectrum1@ms2_spectra[[1]])
#'             } else{
#'               masstools::ms2_plot(spectrum1 = spectrum1@ms2_spectra[[1]],
#'                                   spectrum2 = spectrum2@ms2_spectra[[1]])
#'             }
#' 
#'           })