修剪数据，摆脱“*”

Question

我有一个数据集至极的样子：

> data<-c("IGHV1-2*02 F, or IGHV1-2*03 F","IGHV3-23*01 F, or 
> IGHV3-23*04 F","IGHV2-70*01 F","IGHV7-4-1*01") 

我想保持“V1-2”的首次亮相，例如和删除任何事情如下（包括“*”）。 所以我试过如下：

> data.substr<-substr(data,4,9) 
> data.substr1<-gsub("*","",data.substr) 

，但我仍然无法摆脱“*”，可能是因为它用作占位符... 有没有人有一个想法？

Answer 1

gsub("[*].*$","",data) 

放*在方括号中，它会被视为字符，则任何值.*直到字符串$将被删除的结束。