tests/testthat/test-recompute-signal.R

## Tests for recomputeSignalFromRatios()
## library(TPP2D); library(testthat); source("setup-2dtpp-dataset.R"); source("test-recompute-signal.R")
context("recompute signal from ratios")

test_that("recomputeSignalFromRatios works as expected", {
  out <- data.frame(recomputeSignalFromRatios(simulated_cell_extract_df))
  expect_equivalent(data.frame(simulated_cell_extract_df), out)
})

Try the TPP2D package in your browser

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

TPP2D documentation built on Nov. 8, 2020, 4:54 p.m.