1library(pystr) 2context("pystr_rjust") 3 4test_that("it uses spaces by default", { 5 expect_equal(pystr_rjust("hello", 7), " hello") 6}) 7 8test_that("it allows you to pass a fillchar", { 9 expect_equal(pystr_rjust("hello", 7, "*"), "**hello") 10}) 11 12test_that("it works with a character vector", { 13 expect_equal(pystr_rjust(c("hello", "hi"), 7, "*"), c("**hello", "*****hi")) 14}) 15