tests/testthat/test_1-2-0_mean_na.R

context("mean_na")

test_that("mean na", {
  expect_equal(mean_na(1:5), 0)
  expect_equal(mean_na(NA), 1)
  expect_equal(mean_na(c(1:4, NA)), 0.2)
})
HughParsonage/hutils documentation built on Feb. 12, 2023, 8:26 a.m.