替換可變字符串的部分在數據幀

Question

我有數據幀：

 SINGLE_MEM      crd  
1   5  -97.75514500005232 30.263874000727306 
2   8  -97.81095799930782 30.234157000528484))) 
3   3  ((-97.68044500036247 30.267636999839592 
4   2  -97.71808637589912 30.1848525102668)) 
5   10  -97.76847799967814 30.432537999903005 
6   6  -97.6937453403672 30.46382579769979 

在CRD列我在字符座標。我需要替換所有'（）' 上的差距。我代替 '）'， '））'， '）））' 通過

df$crd <- gsub(")))", "", df$crd) 
df$crd <- gsub("))", "", df$crd) 
df$crd <- gsub(")", "", df$crd) 

，但我不能代替 '（'， '（（'， '（（（'，因爲我有一個錯誤：Error in gsub ("((", "", df $ crd): Incorrect regular expression '((', reason 'Missing') ''

Answer 1

您可以使用

gsub("[()]+", "", df$crd)