如何在R中超时大型SQL查询

我在RODBC中运行一个SQL查询。有些参数是用户定义的，存在运行大型SQL查询的风险

我想检测并停止任何在一定时间内运行的SQL查询

我看过R.utils，但它似乎没有超时：

R.utils::withTimeout({sqlQuery(ch, sql)}, timeout = 1.08)