tests/testthat/test-proc_freq.R

library(helda)

context('Proc Freq Function')

test_that("proc freq", {
  data <- iris
  load(file = 'proc_freq_test.Rda')
  expect_equal(proc_freq(data$Species), proc_freq_test, check.environment = FALSE)
})

Try the helda package in your browser

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

helda documentation built on Jan. 6, 2021, 5:09 p.m.