R语言烦人的“error while fetching rows”该这样解决

今天我想使用协调过滤算法和R用数据库里面数据进行分析，但在刚处理数据库这块，遇到了下面的这个错误，当我输入语句的时候，出现了下面

>Warning message:
In dbFetch(con_query, n = -1) : error while fetching rows

就在我百度，谷歌了无果的时候，气到了差点摔电脑的时候，我重新输入了

>con_query<-dbSendQuery(con,"select*from all_gzdata where fullURLId=107001")#R通过连接对表按条件查询，查询数据为107001的数据

结果提示

>Error in .local(conn, statement, ...) : 
  could not run statement: MySQL server has gone away