仅在r中的数值上从字符串中删除引号

考虑到字符串，我如何才能获得期望的结果

('9','','','','','','','','31.23','testing7'),('10','','','','','','','','31.23','testing10')

期望输出

(9,'','','','','','','',31.23,'testing7'),(10,'','','','','','','',31.23,'testing10')

---

请尝试以下正则表达式：

s <- "('9','','','','','','','','31.23','testing7'),
      ('10','','','','','','','','31.23','testing10')"

gsub("'(-?\\d+(?:[\\.,]\\d+)?)'", x = s, replacement = "\\1")

可能一点也不。

"(9,'','','','','','','',31.23,'testing7'),(10,'','','','','','','',31.23,'testing10')"