tests/testthat/test-BenchmarkRvsCpp.R

library(testthat)
context("BenchmarkRvsCpp")

library(PCMBase)
library(PCMBaseCpp)

test_that(
  "BenchmarkRvsCpp is passing.", 
  expect_error(
    expect_error(
      BenchmarkRvsCpp(ks = 2, includeParallelMode = FALSE, verbose = TRUE))))

Try the PCMBaseCpp package in your browser

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

PCMBaseCpp documentation built on March 23, 2020, 1:06 a.m.