R无法使用UTF-8正确编码罗马字符

Question

我正在处理一个位置数据集，其中一些位置名称使用本地字符。大多数字符都被正确地看到，但我对一些罗马尼亚字符有意见，比如“ș”。

我尝试改变我的Windows 10 64位系统区域设置使用UTF-8编码，但这并没有解决问题。

可以在此处找到用于测试的示例文件：https://drive.google.com/file/d/1T7QQQ7G_dA_rXD9Ewf51uuQ6CUkscjP_/view?usp=sharing

此行导入数据：

df <- read.delim("R_Encode_Issue.csv", header=TRUE, sep=",", encoding = "UTF-8", colClasses=c("character","character","character"))

> df
  region country         chapter
1 Europe Moldova Chi<U+0219>inau

这将在控制台和查看器中将位置章节显示为“chiunu”（Stackoverflow无法显示此内容，即使：D）。

如果我将data_表转换为TIBLE：

df2 <- as_tibble(df)

> df2
# A tibble: 1 x 3
  region country chapter 
  <chr>  <chr>   <chr>   
1 Europe Moldova Chișinău

控制台将位置章节显示为“Chiinu”，但观众显示为“Chiinau”。

我将数据写入一个数据库。csv文件：

write.csv(df2, file = "R_Encode_Out.csv",row.names=FALSE, na="", fileEncoding = "UTF-8") 

在书面文件中，位置章节写为“chiunu”。

R版本：

platform       x86_64-w64-mingw32          
arch           x86_64                      
os             mingw32                     
system         x86_64, mingw32             
status                                     
major          3                           
minor          5.3                         
year           2019                        
month          03                          
day            11                          
html" target="_blank">svn rev        76217                       
language       R                           
version.string R version 3.5.3 (2019-03-11)
nickname       Great Truth     

RStudio版本：

$mode
[1] "desktop"

$version
[1] ‘1.1.463’

当我在导入和导出时使用UTF-8作为编码时，我希望查看器，或者至少是写入的文件能够正确显示字符。但实际情况是，字符导出不正确。

我能做些什么来纠正这个问题？

Answer 1

尝试使用不同于base R的导入和导出函数。我使用导出文件中的readr实现了这一点（看起来查看器确实将其显示为Chi）

library(readr)
df <- read_csv("C:/Users/Andrew/Downloads/R_Encode_Issue.csv", locale = locale(encoding = "UTF-8"))

df
# A tibble: 1 x 3
  region country chapter 
  <chr>  <chr>   <chr>   
1 Europe Moldova Chișinău

write_csv(df, "C:/Users/Andrew/Desktop/R_Encode_Issue.csv")