tests/testthat/test_as-methods.R

context("as")

test_that("as", {
  p <- createMassPeaks(mass=1:10, intensity=11:20, snr=rep(1, 10),
                       metaData=list(file="foo"))
  s <- createMassSpectrum(mass=1:10, intensity=11:20, metaData=list(file="foo"))
  expect_equal(as(p, "MassSpectrum"), s)
})

Try the MALDIquant package in your browser

Any scripts or data that you put into this service are public.

MALDIquant documentation built on Sept. 11, 2024, 6:15 p.m.