r - 在 where 语句中插入数值

Question

我有以下代码运行得非常顺利：

 sql_cag <- sprintf("SELECT * FROM `CAG_table` WHERE `comp_id` = 1");
 df <- dbGetQuery(con, sql_cag)

但是，我现在想做的是1用参数替换 。所以像这样：

 sql_cag <- sprintf("SELECT * FROM `CAG_table` WHERE `comp_id` ='%a'", competitie_id);
 df <- dbGetQuery(con, sql_cag)

带参数competitie_id

 competitie_id <- 1
 competitie_id <- as.numeric(competitie_id)

但这会返回一个空数据框。所以不知何故，“%a”似乎出了点问题。有什么想法可能会出错吗？