将R中的大写字母地址转换为小写

Question

我有一个数据帧，其中有很多地址，但它们都用大写字母表示，我希望它们用小写字母表示，但要保留单词的第一个字母为大写字母。

我使用函数lowercase，但整个单词变成小写

在这种情况下

tolower("231 MATTIE'S WAY")
[1] "231 mattie's way"

但我需要

"231 Matties's Way"

我如何做到这一点有帮助吗？