test_that("`str_remove_quoted()` works", {
string <- "\"abc\"67a\'dk\'f"
expect_equal(str_remove_quoted(string), "67af")
expect_equal(str_remove_quoted(character()), character())
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.