tests/testthat/test_splitNumNames.R
In IntiQuan/IQSlides: Produce Powerpoint Output from R and IQRtools Objects (Add-On for IQRtools)
library(testthat)
library(IQSlides)
test_that("IQSlides:::splitNumNames", {
files <- c("1_bla", "2_bla_bli", "3_bla_bli_blub")
result <- IQSlides:::splitNumNames(files)
expect_equal(result$prefix, c(1, 2, 3))
expect_equal(as.character(result$name), c("bla", "bla_bli", "bla_bli_blub"))
expect_true(result$OK_prefix)
expect_equal(result$original, files)
})
IntiQuan/IQSlides documentation built on Jan. 26, 2024, 1 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.
library(testthat)
library(IQSlides)
test_that("IQSlides:::splitNumNames", {
files <- c("1_bla", "2_bla_bli", "3_bla_bli_blub")
result <- IQSlides:::splitNumNames(files)
expect_equal(result$prefix, c(1, 2, 3))
expect_equal(as.character(result$name), c("bla", "bla_bli", "bla_bli_blub"))
expect_true(result$OK_prefix)
expect_equal(result$original, files)
})
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.