修剪R中的数据,摆脱"*"

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)

放入*方括号,它将被视为字符,然后任何值,.*直到字符串的结尾$将被删除.