从列表中选择最终项目

Question

我有一个名单，想提取每个人的姓氏。复杂的是，有些条目有中间名，有些有昵称等。这是我的例子，建立在this 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"