Rのエラー：不正な正則表現です、理由は 'Missing ')'' はどういう意味でしょうか

Question

コード
px<-c("(","(これから","はや")
x <- grep("^($", px)
x

エラーの出るコードは以上のコードです。エラーの出ているコードはgrepの行です。
この場合はどのように解決すれば良いのでしょうか。わかる方よろしくお願いいたします。

Comments

[gouf]

「grep("^($", px)」を「grep("^\($", px)」に変更した場合、何か変化は見られますか? (バックスラッシュでエスケープする)

[oika77]

ありがとうございます。今試してみましたところ、このようなエラーが出てきました。
エラー: ""^\(" で始まる文字列の中で '\(' は文字列で認識されないエスケープです

[1T2R3M4]

x<-grep("^\\($", px)
paizaでは動きました、試してみて下さい。
x<-grep("^[(]$", px)
でもできました。古い記事ですが
https://stat.ethz.ch/pipermail/r-help//2012-March/305284.html
を参考にしました。

[KojiDoi]

文字コードはUTF-8になさってますかね？ shiftJISとかになってない？

[oika77]

1T2R3M4さん
ありがとうございます。しかしその書き方だと少し使い辛いので一般的なやり方を探してみます。

[oika77]

KojiDoiさん
csvを取得する時にread.csv("data/data_utf8.csv", fileEncoding = "utf8")とやっています。(fileEncoding = "utf8"を指定している)しかしうまくいきません。

Answer 1

(は正規表現においてグループの始まりを示すメタ文字であり、対応する)が無ければ文法エラーとなります。括弧をメタ文字ではなく通常の文字として扱いたい場合は、これにバックスラッシュをつける必要があります。
さらに、Rの文字列定数の中ではバックスラッシュは\のように重ねて書かなければなりません。

つまり

px<-c("(","(これから","はや")
x <- grep("^\($", px)
print(x)

Ref:
Rの正規表現 - Qiita