tests/testthat/test-shoe_mask.R
In srvanderplas/ShoeScrubR: Functions for cleaning data from CSAFE's Longitudinal Shoe Study
context("shoe_mask")
test_that("shoe_mask works as expected", {
expect_equal(dim(shoe_mask("Adidas", size = 10, foot = "L")), c(1998, 3906))
expect_equal(dim(shoe_mask("Nike", size = 8, foot = "L", ppi = 200)), c(1332, 2616))
expect_error(shoe_mask("Adidas", size = 8, foot = "L"))
expect_error(shoe_mask("Nike", size = 7, foot = "L"))
})
srvanderplas/ShoeScrubR documentation built on Nov. 27, 2019, 2:09 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("shoe_mask")
test_that("shoe_mask works as expected", {
expect_equal(dim(shoe_mask("Adidas", size = 10, foot = "L")), c(1998, 3906))
expect_equal(dim(shoe_mask("Nike", size = 8, foot = "L", ppi = 200)), c(1332, 2616))
expect_error(shoe_mask("Adidas", size = 8, foot = "L"))
expect_error(shoe_mask("Nike", size = 7, foot = "L"))
})
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.