Nothing
context("Convert camelCase character to separated")
test <- c("CamelCase", "CamelCamelCase", "Camel2Camel2Case", "getHTTPResponseCode", "get2HTTPResponseCode", "HTTPResponseCode", "HTTPResponseCodeXYZ")
result <- c("camel.case", "camel.camel.case", "camel2.camel2.case", "get.http.response.code", "get2.http.response.code", "http.response.code", "http.response.code.xyz")
test_that("Identical results", {
expect_identical(to_separated(test), result)
})
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.