Nothing
tests/testthat/test-marginal_rate.R
In grattan: Australian Tax Policy Analysis
test_that("marginal_rate works", {
s1314 <- .sample_file_1314()[1:101]
mr100 <- marginal_rate(s1314, "2013-14")
mr1 <- marginal_rate(s1314, "2013-14", run = 1)
expect_equal(mr1[1], 0)
expect_equal(mr100[1], 0)
})
Try the grattan package in your browser
Any scripts or data that you put into this service are public.
grattan documentation built on Sept. 4, 2023, 5:08 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.
test_that("marginal_rate works", {
s1314 <- .sample_file_1314()[1:101]
mr100 <- marginal_rate(s1314, "2013-14")
mr1 <- marginal_rate(s1314, "2013-14", run = 1)
expect_equal(mr1[1], 0)
expect_equal(mr100[1], 0)
})
Try the grattan 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.