patternapply

Iteratively try patterns against a character vector.
git clone https://git.eamoncaddigan.net/patternapply.git
Log | Files | Refs | README | LICENSE

test_filterPatternMatches.R (200B)

      1 library(patternapply)
      2 context("filterPatternMatches")
      3 
      4 test_that("filterPatternMatches", {
      5   expect_equal(filterPatternMatches(paste(seq(0,99)), "[1-9]$"),
      6                paste(seq(0, 99, by=10)))
      7 })