r - 列からのプロットのテキスト、「;」の最初の引数 分割された文字列

Question

1つの簡単な質問

次のようなデータフレームを描く

data=data.frame(x=c(1,2,3), y=c(4,5,6), Genes=c("AHS;AKS;AHS","AHS;IO","HU"))

だから私はxとyをプロットしたい

plot(x,y) 

このようにドットのラベルを付けます

text(data$x+0.2,data$y+0.2,labels=data$Genes)

しかし、遺伝子列のすべての引数を最初の引数だけに使用したくありません（たとえば、「;」の前）。それを手伝ってもらえますか？これは単なる例であり、私はすでにデータをで読み込んread.delimでいるので、文字列の区切りで特定の「読み込み」を行うことはできません。

Answer 1

私のコメントによると、gsubこれを行うために使用することができます：

gsub('^([A-Z]+);.*$', '\\1', data$Genes)

また、使用することができますstrsplit：

unlist(lapply(strsplit(data$Genes, ';'), '[', 1))

しかし、それは厄介です...

stringrまた、これらの文字列変更関数の多くを予測可能な構文と名前で1つの場所に収集するパッケージについても言及する価値があります。