Nothing
library(pystr)
context("pystr_count")
test_that("it doesn't count overlapping occurrences", {
count = pystr_count("ababab", "aba")
expect_equal(count, 1)
})
test_that("it counts non-overlapping occurrences", {
count = pystr_count("babbab", "bab")
expect_equal(count, 2)
})
test_that("it only counts things within the specified range", {
count = pystr_count("babbab", "bab", 1, 3)
expect_equal(count, 1)
})
test_that("it returns 0 when asking for a range outside the string's range", {
count = pystr_count("ababab", "ab", 10, 15)
expect_equal(count, 0)
})
test_that("it handles NAs", {
count = pystr_count(NA, "bab", 1, 3)
expect_true(is.na(count))
})
test_that("it counts substrings not adjacent", {
expect_equal(pystr_count("a--b--c", "--"), 2)
})
test_that("it counts substrings at the beginning", {
expect_equal(pystr_count("--a--b", "--"), 2)
})
test_that("it counts substrings at the end", {
expect_equal(pystr_count("a--b--", "--"), 2)
})
test_that("it counts empty strings", {
expect_equal(pystr_count("hi", ""), 3)
})
test_that("it works with a vector of strings", {
expect_equal(pystr_count(c("one", "two", "three"), "e"), c(1, 0, 2))
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.