tests/testthat/test_physics.R
In FredrikWartenberg/rainbowLab: Generate Rainbows
## Physics functions
## Fresenel
testFunction <- fresnelSpecific(n=1.33,dir="o2i")
test_that("Fresenel Function", {
expect_equal(round(testFunction(pi/3)$R_m,4), 0.0591)
})
FredrikWartenberg/rainbowLab documentation built on April 5, 2021, 11:42 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.
## Physics functions
## Fresenel
testFunction <- fresnelSpecific(n=1.33,dir="o2i")
test_that("Fresenel Function", {
expect_equal(round(testFunction(pi/3)$R_m,4), 0.0591)
})
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.