tests/testthat/test_wtdVar.R
In weirichs/eatTools: Miscellaneous Functions for the Analysis of Educational Assessments
x <- c(50, 0, 25)
w <- c(1, 5, 1)
##saveRDS(Hmisc::wtd.var(x, w), "C:/Users/benjb/Documents/Repositories/eatTools/tests/testthat/helper_hmisc_wtdvar.RDS")
hmisc_wtdvar <- readRDS("helper_hmisc_wtdvar.RDS")
test_that("wtdvar implementation", {
expect_equal(wtdVar(x, w), hmisc_wtdvar)
})
weirichs/eatTools documentation built on April 3, 2024, 6:11 p.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.
x <- c(50, 0, 25)
w <- c(1, 5, 1)
##saveRDS(Hmisc::wtd.var(x, w), "C:/Users/benjb/Documents/Repositories/eatTools/tests/testthat/helper_hmisc_wtdvar.RDS")
hmisc_wtdvar <- readRDS("helper_hmisc_wtdvar.RDS")
test_that("wtdvar implementation", {
expect_equal(wtdVar(x, w), hmisc_wtdvar)
})
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.