tests/testthat/test-rotatePlot.R
In ecology-rocks/disperseR: Calculating Spatial Seed Dispersal Rates
context("rotatePlot")
test_that("Bad x/y values", {
expect_error(rotatePlot(data.frame(x=c("a",1:5), y=0:-5, stringsAsFactors=FALSE)), "Sorry")
})
test_that("Correct function", {
expect_equal(rotatePlot(data.frame(x=c(0,4), y=c(0,-3), stringsAsFactors=FALSE)), data.frame(x=c(0, 5), y=c(0,0)))
})
ecology-rocks/disperseR documentation built on May 15, 2019, 7:58 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.
context("rotatePlot")
test_that("Bad x/y values", {
expect_error(rotatePlot(data.frame(x=c("a",1:5), y=0:-5, stringsAsFactors=FALSE)), "Sorry")
})
test_that("Correct function", {
expect_equal(rotatePlot(data.frame(x=c(0,4), y=c(0,-3), stringsAsFactors=FALSE)), data.frame(x=c(0, 5), y=c(0,0)))
})
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.