1library(pystr) 2context("pystr_lstrip") 3 4test_that("it strips spaces by default", { 5 expect_equal(pystr_lstrip(" spacious "), "spacious ") 6}) 7 8test_that("it strips characters until it encounters one not in chars", { 9 expect_equal(pystr_lstrip("www.example.com", "w."), "example.com") 10}) 11 12test_that("it works with a character vector", { 13 expect_equal(pystr_lstrip(c(" spacious ", " hi ")), c("spacious ", "hi ")) 14}) 15