Nothing
tests/testthat/test-incidence.R
In RDS: Respondent-Driven Sampling
context("incidence.R")
test_that("inc",{
hiv <- rep(FALSE, 5000)
hiv[1:1000] <- TRUE
recent <- rep(NA, 5000)
recent[1:1000] <- FALSE
recent[1:50] <- TRUE
expect_true(round(RDS:::incidence(recent,hiv),5) == 0.01895)
})
Try the RDS package in your browser
Any scripts or data that you put into this service are public.
RDS documentation built on Aug. 20, 2023, 9:06 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
context("incidence.R")
test_that("inc",{
hiv <- rep(FALSE, 5000)
hiv[1:1000] <- TRUE
recent <- rep(NA, 5000)
recent[1:1000] <- FALSE
recent[1:50] <- TRUE
expect_true(round(RDS:::incidence(recent,hiv),5) == 0.01895)
})
Try the RDS package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.