从R向MySQL写入含德语变音特殊字符的数据时遭遇编码问题

我之前也碰到过类似的德语变音符号（像ä、ö、ß这类）写入MySQL乱码的问题，本质是R和MySQL两端的编码没有对齐，给你几个关键步骤来搞定：

1. 先把MySQL的编码改成支持特殊字符的格式 #

首先要确保你的数据库和目标表用的是能覆盖德语特殊字符的编码，utf8mb4是最优选择（它比MySQL默认的utf8支持更多Unicode字符）。登录MySQL执行下面的SQL命令：

-- 修改数据库编码
ALTER DATABASE your_database_name CHARACTER SET utf8mb4 COLLATE utf8mb4_unicode_ci;
-- 修改目标表的编码
ALTER TABLE your_table_name CONVERT TO CHARACTER SET utf8mb4 COLLATE utf8mb4_unicode_ci;

替换掉your_database_name和your_table_name成你实际的库名和表名就行。

2. R连接MySQL时明确指定编码 #

不管你用DBI+RMariaDB还是旧的RMySQL包，连接数据库的时候一定要指定编码为utf8mb4，让两端编码统一：

用RMariaDB的情况： #

library(DBI)
library(RMariaDB)
# 建立连接时指定编码
conn <- dbConnect(RMariaDB::MariaDB(),
                  dbname = "你的数据库名",
                  host = "你的主机地址",
                  user = "用户名",
                  password = "密码",
                  encoding = "utf8mb4")

用RMySQL的情况： #

library(RMySQL)
conn <- dbConnect(MySQL(),
                  dbname = "你的数据库名",
                  host = "你的主机地址",
                  user = "用户名",
                  password = "密码",
                  encoding = "utf8mb4")

3. 确保R里的数据编码是UTF-8 #

有时候你的数据在R里本身编码就不对，先检查一下proj_name列的编码：

# 查看当前编码
Encoding(p$proj_name)

如果显示不是UTF-8，就把它转成UTF-8：

# 转换编码，不确定原编码的话from设为空让系统自动检测
p$proj_name <- iconv(p$proj_name, from = "", to = "UTF-8")

4. 写入数据库并验证 #

最后用标准的写入函数把数据导进去，不用额外手动转码：

# 写入表，根据需要调整overwrite参数
dbWriteTable(conn, name = "你的表名", value = p, row.names = FALSE, overwrite = FALSE)

写完之后可以读回来验证一下：

# 读取数据检查特殊字符
result <- dbReadTable(conn, "你的表名")
print(result$proj_name)

这样操作下来，德语的变音符号应该就能正常显示和存储了。

内容的提问来源于stack exchange，提问作者Haribo