tests/testthat/test-addVariable.R

In ncborcherding/scRepertoire: A toolkit for single-cell immune receptor profiling

# test script for addVariable.R - testcases are NOT comprehensive!

test_that("addVariable works", {
  expect_equal(addVariable(getCombined(), 
                           variable.name = "Type", 
                           variables = rep(c("B", "L"), 4)),
               getdata("processing", "addVariable_data"))
})