如何用R语言的gsub将字符串单词首字母外的字符转为小写？

当然可以实现这个需求！借助gsub()和Perl风格的正则表达式，我们能轻松完成字符串的格式化。

核心思路是捕获每个单词的首字母，将首字母之后的所有字符统一转为小写，同时保留首字母原本的大小写状态。直接上代码：

text <- "This String IS a tESt. TRYING TO fINd a waY to do ThiS."
# 执行转换
formatted_text <- gsub("(\\w)(\\w+)", "\\1\\L\\2", text, perl = TRUE)

# 查看结果
formatted_text
# [1] "This String Is a test. Trying To find a way to do This."

代码细节解释： #

• (\\w)：捕获每个单词的首字符（\\w匹配字母、数字或下划线，针对你的英文场景完全适用）
• (\\w+)：捕获首字母之后的所有连续字符
• \\1：保留捕获到的首字母，维持它原本的大小写（比如原单词IS的首字母I保持大写，tESt的首字母t保持小写）
• \\L\\2：把第二个捕获组的所有字符转为小写（\\L是Perl正则的转小写标记，必须开启perl=TRUE才能生效）
• perl=TRUE：启用Perl兼容正则，让\\L这类特殊转义序列正常工作

如果你的字符串里可能包含数字或下划线，且不想处理这类字符，可以把正则里的\\w换成[A-Za-z]，只匹配英文字母：

formatted_text <- gsub("([A-Za-z])([A-Za-z]+)", "\\1\\L\\2", text, perl = TRUE)

运行后就能得到你期望的输出啦！

内容的提问来源于stack exchange，提问作者Ankhnesmerira