R语言如何读取MySQL数据

项目背景：算法开发语言R，数据库：MySQL，数据库位于服务器上，通过本地电脑的R程序获取MySQL中的数据。
本中将通过RMySQL连接MySQL数据库。

library(RMySQL)
criterions_cite <- function(){
	#建立连接，project_name表示项目数据库名称
	conn <- dbConnect(MySQL(), dbname = 'project_name', username = 'xxx', password = 'xxxxxxxxx', host = '192.168.1.200', port = 3306)
	#如果表中有中文出现乱码，可以添加以下代码
	dbSendQuery(conn, 'SET NAMES GBK')
	#sheet_name表示需要读取的表格名称
	filter_statements <- paste0('SELECT * FROM sheet_name where distinguish = 1 and deleted = 1')
	#过滤数据
	res <- dbSendQuery(conn, filter_statements)
	#提取数据，-1表示全部提取，3表示取三行数据
	dat <- dbFetch(res, -1)
	#关闭RMySQL中的数据集
	dbClearResult(dbListResults(conn)[[1]])
	#关闭连接
	dbDisconnect(conn)
	return(dat)
}

参考资料：
https://www.jianshu.com/p/35e53578fce3
https://www.cnblogs.com/awishfullyway/p/6668270.html
https://yq.aliyun.com/articles/119495
https://blog.csdn.net/wlt9037/article/details/73882812