tests/testthat/test-cox.stuart.R

test_that("Example 4.13", {
  expect_equal(cox.stuart(ch4$precipitation)$pval.exact, 0.68750)
})

test_that("Exercise 4.8", {
  expect_equal(cox.stuart(ch4$days.waiting)$pval.exact, 0.0703125)
})

test_that("Exercise 4.9", {
  expect_equal(cox.stuart(ch4$rainfall.by.latitude)$pval.exact, 0.125)
})

test_that("Exercise 4.10", {
  expect_equal(cox.stuart(ch4$points)$pval.exact, 0.2890625)
})

test_that("Exercise 4.11", {
  expect_equal(cox.stuart(ch4$rainfall.DRC)$pval.exact, 0.2890625)
})

test_that("Exercise 4.12", {
  expect_equal(cox.stuart(ch4$piped.water.DRC)$pval.exact, 1)
})

test_that("Exercise 10.5", {
  expect_equal(cox.stuart(app1$McDelta[order(ch10$death.year)], alternative = "less")$pval.exact,
               0.1875)
})

Try the ANSM5 package in your browser

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

ANSM5 documentation built on Sept. 11, 2024, 6:45 p.m.