powered by
Convert text to the most occuring case. In case of ties, the first occurence in sorted order will be taken.
harmonize(x)
character vector
character vector with harmonized names (i.e., same case)
# NOT RUN { x <- c("FOO", "Foo", "bar", "FOO", "bar", "FOO", "Bar") y <- harmonize(x) stopifnot(all.equal(y, c("FOO", "FOO", "bar", "FOO", "bar", "FOO", "bar"))) # }
Run the code above in your browser using DataLab