在R中重新连接MySQL连接

Question

我遇到以下问题，我正在使用R脚本来创建长达24小时以上的MySQL连接。

我的问题是，如果打开的连接超过8小时，则服务器会丢弃所有打开的连接。

我想自动“重新连接”该连接，或者创建一个检查连接的过程，如果连接消失，则重新连接。

在for循环中使用此代码，我认为可以解决，但是24小时后它就会崩溃。

if(!dbIsValid(con_old)) {
    con_old <- dbConnect(drv, user="supertrack", password="*", dbname="", host= "supertrack.db.local",port=3306)
  }

此代码检查位于for循环内，在该循环中所有查询均已完成，我认为如果服务器关闭连接，则可以使用此简单方法检查连接是否存在，但是在连接过程中是否可以关闭连接进行检查。

任何想法我该如何解决？