从列表中选择最终项目

Question

我有一个名单,想提取每个人的姓氏.复杂的是,有些条目有中间名,有些有昵称等.这是我的例子,基于这个问题,但改变格式以反映我的情况:

df <- c("bob smith","mary ann d. jane","jose chung","michael mike marx","charlie m. ivan")

要获得名字,我使用以下内容:

firstnames <- sapply(strsplit(df, " "), '[',1)

然而,有没有办法让元素处于"最终"位置？提前致谢.

Answer 1

> lastnames <- sapply(strsplit(df, " "), tail, 1)
> 
> lastnames
[1] "smith" "jane"  "chung" "marx"  "ivan"