tests/testthat/test_uniquePresent.R
In philipdelff/NMdata: Preparation, Checking and Post-Processing Data for PK/PD Modeling
context("uniquePresent")
test_that("basic",{
dat0 <- readRDS("testData/data/xgxr2.rds")
dat <- copy(dat0)
dat[c(3,30,50,55,50),WEIGHTB:=NA]
dat
dat[,WEIGHTB:=uniquePresent(WEIGHTB),by=.(ID)]
expect_equal(dat0,dat)
})
philipdelff/NMdata documentation built on June 13, 2025, 6:28 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("uniquePresent")
test_that("basic",{
dat0 <- readRDS("testData/data/xgxr2.rds")
dat <- copy(dat0)
dat[c(3,30,50,55,50),WEIGHTB:=NA]
dat
dat[,WEIGHTB:=uniquePresent(WEIGHTB),by=.(ID)]
expect_equal(dat0,dat)
})
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.