tests/testthat/test-getDigits.R
In inSileco/inSilecoMisc: inSileco Miscellaneous Functions
context("getDigits")
test_that("getDigits", {
expect_equal(getDigits('a1')[[1L]][1L], "1")
expect_equal(getDigits('a1?3', collapse='_')[[1L]], "1_3")
expect_equal(getDigits(c('a1', '?3')), list("1", "3"))
})
inSileco/inSilecoMisc documentation built on Sept. 14, 2022, 5:44 a.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("getDigits")
test_that("getDigits", {
expect_equal(getDigits('a1')[[1L]][1L], "1")
expect_equal(getDigits('a1?3', collapse='_')[[1L]], "1_3")
expect_equal(getDigits(c('a1', '?3')), list("1", "3"))
})
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.