Rのデータセット内の特定のベクターから最初の文字を抽出する

Question

私はRでbabynameデータセットを使って作業しています。 データセットには、名前：babies1900$nameという列が含まれています。 私はベクトル名の各行から最後の文字を抽出する方法を知っています。

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

私は、別の年のデータセットの最初の文字について同じことを行うことに関心がありました。 これは私がやったことですが、もっと「エレガントな」方法があるのだろうかと思っています。

x = babies2009$name 

x = nchar(x) 

y= x + 1 

z = y -x 

z = 
[1] 1 

babies.test = substr(babies2009$name, z, z) 

これは完全に機能しますが、別の方法がありますか？

Answer 1

私は質問を取得しますが、ないかもしれません：

substr(babies2009$name, 1, 1)