Ошибка в grep (pattern, x): недопустимое регулярное выражение '#Renewables (wind and', причина 'Отсутствует') '

Question

Я не знаю, почему, учитывая

> pattern
  [1] "#Renewables (wind and"

, этот простой код

x<-"#Renewables (wind and #solar combined with storage) are a"
grep(pattern,x)

выдает такую ​​ошибку:

Error in grep(pattern, x) : 
  invalid regular expression '#Renewables (wind and', reason 'Missing ')''