1library(pystr) 2context("pystr_upper") 3 4test_that("it converts to lowercase", { 5 expect_equal(pystr_upper("hello!"), "HELLO!") 6}) 7 8test_that("it works with a character vector", { 9 expect_equal(pystr_upper(c("Hello", "World")), c("HELLO", "WORLD")) 10}) 11