从列中提取第一个单词并插入新列

Question

我有一个数据框,想要提取第一个单词并将其插入新列

Dataframe1:

COL1
Nick K Jones
Dave G Barros
Matt H Smith

将其转换为:

Dataframe2:
COL1              COL2
Nick K Jones      Nick
Dave G Barros     Dave
Matt H Smith      Matt

Answer 1

您可以使用正则表达式("([A-Za-z]+)"或"([[:alpha:]]+)"或"(\\w+)")来获取第一个单词

Dataframe1$COL2 <- gsub("([A-Za-z]+).*", "\\1", Dataframe1$COL1)

Answer 2

您可以使用库中的函数word()(stringr):

library(stringr)

Dataframe1$COL2 <- word(Dataframe2$COL1, 1)

Answer 3

该功能strsplit非常有用

Dataframe1$COL2 <- strsplit(Dataframe1$COL1, " ")[[1]][1]

然后,您可以更改最后一个括号中的数字,以便从字符串中选择其他部分.