最终的解决办法直接看 4
我的思路：
我用的都是utf-8编码，电脑系统win7， MySQL-Front进行数据库的可视化。
1、我用的是RStudio，先去设置R的默认编码：
Tools→Global Options...→Code→Saving→如下
虽然设置了R的默认编码，但是问题仍然存在。
2、用dbSendQuery(con, "SET NAMES utf8")， 依旧是乱码
library("RMySQL");
con<-dbConnect(MySQL(), user="", password="", dbname=""); #打开连接
dbSendQuery(con, "SET NAMES utf8"); #说明用什么字符集来获取数据库字段
query<-dbSendQuery(con, "select * from table1 ");
result<-fetch(query);
3、既然是从MySQL中读取数据，那就看看是不是MySQL中的编码设置不统一。
方法一 ： 参考MySQL字符集专题（字符集，校对，乱码） 该文章的2.3 2.4 4.2
#查看当前数据库字符集 show variables like 'character%'; #查看当前数据库字符集校对 show variables like 'collation%';
我的结果：
可以看到其中的很多编码都是不统一的，用如下方法设置：
或者是方法二
方法二：mysql 更改数据库字符编码的方法 百度经验
通过MySQL命令行修改:（编码可选）
mysql> set character_set_client=utf8;
mysql> set character_set_connection=utf8;
mysql> set character_set_database=utf8;
mysql> set character_set_results=utf8;
mysql> set character_set_server=utf8;
mysql> set character_set_system=utf8;
mysql> set collation_connection=utf8;
mysql> set collation_database=utf8;
mysql> set collation_server=utf8;
设置后我的MySQL-Front编辑器中输出的结果仍然未变，我就用了，如下的方法三，成功把编码都改为utf8。
方法三： 在MySQL-Front编辑器输入如下，进行运行。
set character_set_client='utf8';
set character_set_connection='utf8';
set character_set_results='utf8';
set character_set_server='utf8';
set collation_connection='utf8_unicode_ci';
set collation_server='utf8_unicode_ci';
4、经过3将MySQL中的编码设置一致，但是问题依然没有解决，无意间将 dbSendQuery(con, "SET NAMES gbk") 设为gbk，乱码问题解决。
library("RMySQL");
con<-dbConnect(MySQL(), user="", password="", dbname=""); #打开连接
dbSendQuery(con, "SET NAMES gbk"); #说明用什么字符集来获取数据库字段
query<-dbSendQuery(con, "select * from table1 ");
result<-fetch(query);
为什么会是这样？ 参考 求解 r链接mysql 查询结果出现 乱码 ，如何更改r字符编码？
R的字符编码使用的gbk，所以读取时的数据需要设定为gbk，数据库 ，工作环境，本地 需要保持一致。
其他参考: