ベクトルの各要素の3番目の " - "の後のすべての文字を削除します

Question

Rの正規表現ではあまりよくありません。各要素の3番目の " - "の後にすべての文字を削除したいと思います。ベクトル。

Initial string 
aa-bbb-cccc => aa-bbb 
aa-vvv-vv  => aa-vvv 
aa-ddd   => aa-ddd 

ヘルプがありますか？

Answer 1

サンプル入力と予想される出力から判断すると、2番目のハイフンで始まる部分をすべて削除する必要があると仮定します。 -以外の文字グループ1の撮影0+ - 文字列

([^-]*-[^-]*)の開始 -

• ^：

  あなたはregex demo

  詳細を参照してください

  sub("^([^-]*-[^-]*).*", "\\1", x) 
  

  を使用することができます、-と0+ -

• .*以外の文字 - 任意の0+文字（このようなTRE正規表現では、ドットがラインあまりにも、文字を破る一致する。）

\\1（\1）後方参照がにありますグループ1

R demoに取り込まテキスト：

x <- c("aa-bbb-cccc", "aa-vvv-vv", "aa-ddd") 
sub("^([^-]*-[^-]*).*", "\\1", x) 
## => [1] "aa-bbb" "aa-vvv" "aa-ddd"