Convert the case of Riken genes no matter input case

Convert the case of Riken genes no matter input case

riken_case(in_chr)

Arguments

in_chr

a character vector of Riken gene symbols

Value

a character vector with correck Riken capitalization

Examples

test <- c("6330527o06RiK","A930038C07RIK","a330070k13rik")
riken_case(test)
#> [1] "6330527O06Rik" "A930038C07Rik" "A330070K13Rik"