tazinho / snakecase Goto Github PK

Maybe it is easier to just use backreferences and underscore instea of str_split. This would give also the possibility to drop the str_split logic

more osses via travis
windows via appveyor

string <- "MERKWÜRDIGER-VariablenNAME mit.VIELENMustern_version: 3.7.4"

to_any_case(string,

• case = "screaming_snake",
• preprocess = "-|:|(?<!\d)\.",
• protect = "\.",
• replace_special_characters = TRUE,
• postprocess = "\.")
  [1] "MERKWUeRDIGER.VARIABLEN.NAME.MIT.VIELEN.MUSTERN.VERSION.3.7.4"

abbreviations like

"BobDylanUSA"
"MikhailGorbachevUSSR" 
"HelpfulStackOverflowPeople"

might be worth to protect, for example when converting to

[1] "Bob Dylan USA"
[1] "Mikhail Gorbachev USSR"
[1] "Helpful Stack Overflow People"

see
http://stackoverflow.com/questions/36778221/breaking-up-pascalcase-in-r

Maybe No _ should be added when a dot., ; -?!@&€ or other Specials appear. Or Maybe just dots in numbers or other circumstances shall be protected. Maybe protect Numbers Argument= FALSE

How should this be handled? Maybe like in the comments?

> snakecase::to_snake_case("CId") # c_id
[1] "cid"
> snakecase::to_small_camel_case("CId") # cId
[1] "cid"
> snakecase::to_big_camel_case("CId") #CId
[1] "Cid"

Edit: It must be translated to c_id, see RStudio -> r_studio for example for another content based movitation. Or see in the table, for a logical motivation.

Sth like a line in the function or explanation how to do preprocessing, i.e.

purrr::map_chr(string, stringr::str_replace_all, "\\.", "_")

Or backreferencing like in #7 .

Next to each other. This Option shouldnt be default.

cran check, download stats, other checks than travis (see issue #2 )

Systematical Addition of cases to support, similar to german umlauts. Also decide of and how to replace in replace Special characters argument

Using an approach like here
https://github.com/ianstormtaylor/to-case
to detect all case patterns within a string

and use s3 multiple dispatch approach to combine all peaces
@rappster https://github.com/rappster/instancer

Sth like to_snake_case(strings, leave_out = c(2,4,5)) that applies the conversion to everything but elements in leave_out position

at the moment cleaned always within to_snake_case_internal()

for all case combinations

postprocess argument must take a strign and not a regex

to_any_case("MERKWÜRDIGER-VariablenNAME mit.VIELENMustern_version: 3.7.4",
case = "snake",
preprocess = "-|:|(?<!\d)\.",
protect = "\.",
replace_special_characters = TRUE,
postprocess = ".")

returns "." ???

sth like

test_basic_cases <- function(strings){
to_snake_case(string) == to_snake_case(to_snake_case(string))
to_snake_case(string) == to_snake_case(to_small_camel_case(string))
to_snake_case(string) == to_snake_case(to_big_camel_case(string))
to_snake_case(string) == to_snake_case(to_screaming_snake_case(string))

to_small_camel_case(string) == to_small_camel_case(to_small_camel_case(string))
to_small_camel_case(string) == to_small_camel_case(to_snake_case(string))
...
}

• evaluate actual behaviour
• define intended behaviour
• implement
• test
• document

for example

stringr::coll("([A-Z]{2,})")
# instaed of default stringr::regex()

everywhere where characters of a local alphabet are matched