在R中，如何逃出单身'；在变量中，然后将其发送到sqlQuery

在R中，我想向sqlQuery发送一个包含单引号的变量，如下所示：

CASE_NO <- ('001','002')
sqlQuery(db, paste('select * from table A where col_1 in CASE_NO'))

CASE_NO <- gsub(" ' "," \' ",CASE_NO) 

---

CASE\u不，我不确定，因为这里的语法不完全合理<我不确定，因为这里的语法不完全合理<代码>案例编号