R语言中实现将字符串首字符转换为大写，其余为小写

 

001、

test <- "jEnMqAb"      ## 测试字符串

newstr <- ""
for (i in 1:nchar(test)) {
  if (i == 1){
   newstr <- paste0(newstr, toupper(substr(test, 1, 1))) 
  }
  else
  {
    newstr <- paste0(newstr, tolower(substr(test, i, i)))
  }
}
newstr    ## 转换结果