R - 从列中删除逗号后删除任何内容

Question

我想删除此列,以便它只显示姓氏 - 如果有逗号我想删除逗号及其后的任何内容.我的数据列只是姓氏和最后一个,第一个.数据如下:

Last Name  
Sample, A  
Tester  
Wilfred, Nancy  
Day, Bobby Jean  
Morris  

Answer 1

你可以使用gsub()和一些正则表达式:

> x <- 'Day, Bobby Jean'
> gsub("(.*),.*", "\\1", x)
[1] "Day"

Answer 2

你可以使用gsub:

gsub(",.*", "", c("last only", "last, first"))
# [1] "last only" "last"

",.*"说:替换逗号(,)和之后的每个字符(.*),什么都没有"".