尝试通过dplyr集成使用RPresto连接到数据库后发生超时错误

Question

我正在尝试通过RPresto连接到数据库，但是出现以下错误：

test <- tbl(db, 'datatablename')
Error in curl::curl_fetch_memory(url, handle = handle) : 
  Timeout was reached: Connection timed out after 10016 milliseconds

其中db是这样定义的src_presto（）：

db <- src_presto(
  host=<'IP'>,
  port=XXXX,
  user='hadoop',
  schema='db_dev_delivery',
  catalog='hive',
  session.timezone ='US/Eastern')

我看到有人建议使用httr::timeout(100000)，而我在tbl函数上输入的内容为：tbl(db, 'datatablename',timeout(100000))，但没有成功。

src_presto（）是否有问题，还是可以通过其他方式调整的常规内容？

更新：我通过dbConnect尝试过：

conn <- dbConnect(Presto(), catalog = 'hive', schema = 'db_dev_delivery',
                  user = 'hadoop', host = XXXX, port = XXXX,
                  session.timezone='US/Eastern')

dbListTables(conn)

遇到相同的错误。