从R中的数据集中的特定向量中提取第一个字母

我正在R中使用babyname数据集。 数据集包含一个名为name的列：

babies1900$name

。 我知道如何从vector name中的每一行提取最后一个字母

last.letter.1900 <- substr(babies1900$name, nchar(babies1900$name), 
                                            nchar(babies1900$name))

---

这完全有效，但有不同的方法吗？

我可能不明白这个问题，但是：

substr(babies2009$name, 1, 1)

substr(babies2009$name, 1, 1)