括弧内のテキストを解析して返すようにRを使用し

Question

はのは、私は、文字列があるとしましょう：

x <- "This is a string (Yay, string!)" 

私は文字列を解析し、返却したいのですが、「イェーイ、文字列を！」

どうすればよいですか？

私はgrep/grepl/gsub/sub/etcの束を試しましたが、正規表現または引数の適切な組み合わせを見つけることができませんでした。一口。私は正規表現のスキルに取り組む必要があります。

Answer 1

は、ここでそれを行うための二つの方法があります：

ワン

：したい文字列を検索し、見つかったビットを持つ文字列全体を交換してください。 （バック参照として知られている）

gsub(".*\\((.*)\\).*", "\\1", x) 
[1] "Yay, string!" 

は、これは動作します：あなたはあなたが括弧を除外したいので、カッコ(.*)

でマッチした文字列を参照するために後方参照\\1を使用

• 実際の文字列の場合は、\\(と\\)でこれらをエスケープする必要があります。 |がORに似た作用するため

  gsub(".*\\(|\\).*", "", x) 
  [1] "Yay, string!" 
  

  これは動作します：

  ---

  二

：あなたは空の文字列にしたくないすべてのビットを交換してください。あなたはこのようなものの多くをやっていないならば、qdapを得ることはやり過ぎのビットかもしれませんが

> bracketX(x) 
[1] "This is a string" 
> bracketXtract(x) 
[1] "Yay, string!" 

：

library(qdap) 
x <- "This is a string (Yay, string!)" 

bracketX(x) 
bracketXtract(x) 

収量：

Answer 2

qdap version 1.1.0はこれを行うことができます。

編集：ジョシュの例で...また

> x <- "This is (a) string (Yay, string!)" 
> bracketX(x) 
[1] "This is string" 
> bracketXtract(x) 
[1] "a"   "Yay, string!" 

Answer 3

、あなたの文字列の一部を取り出したいすべてがいくつかの括弧で囲まれた部分文字列を、含まれている可能性がある場合、正規表現を使用して、パワーツールgregexpr()とregmatches()：

x <- "This is (a) string (Yay, string!)" 
pat <- "(?<=\\()([^()]*)(?=\\))" 
regmatches(x, gregexpr(pat, x, perl=TRUE)) 
# [[1]] 
# [1] "a"   "Yay, string!" 

の