tests/testthat/test_heart_data.R

context("Testing heart data")
library(extendedFamily)

################
# Test loglog link
################

data(heart)

test_that("Confirm data can be loaded", {
  expect_true(nrow(heart) == 4483)
  expect_true(ncol(heart) == 11)
})

Try the extendedFamily package in your browser

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

extendedFamily documentation built on Nov. 18, 2023, 5:06 p.m.