Извлечение первой буквы из определенного вектора в наборе данных в R

Я работаю в 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)

Это полностью работает, но есть ли другой способ?


person akz    schedule 17.09.2011    source источник


Ответы (1)


Я может не понял вопроса, но:

substr(babies2009$name, 1, 1)
person daroczig    schedule 17.09.2011