library(rkclass)
context("Test that auxillary statistical functions work.")
#data
data(mroz)
#To Test:
# Wald
# Wu-Hausman
# Weak Instruments
# Sargan test for overidentifying
test_that("Wald test is correct", {
})
test_that("Wu-Hausman test is correct", {
})
test_that("Weak Instruments test is correct", {
})
test_that("Sargan overidentification test is correct", {
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.