用日语将.csv从R写入excel

用日语将.csv从R写入excel,r,cjk,R,Cjk,当我把write.csv用于日文文本时,我会在Excel中听到乱七八糟的声音(Excel通常处理日文)。我已经在这个网站上搜索了解决方案,但是我空手而归。是否有要添加到write.csv的编码命令,以使Excel能够从R正确导入日语?感谢您的帮助! 谢谢 作为一种解决方法和诊断方法,您是否尝试过将文件另存为.txt,然后在Excel中打开文件并将数据从文本编辑器粘贴到Excel中?我遇到了完全相同的问题-我使用了我在网上看到的: write.csv(merch_df, file = "

当我把write.csv用于日文文本时,我会在Excel中听到乱七八糟的声音(Excel通常处理日文)。我已经在这个网站上搜索了解决方案,但是我空手而归。是否有要添加到write.csv的编码命令,以使Excel能够从R正确导入日语?感谢您的帮助!
谢谢

作为一种解决方法和诊断方法,您是否尝试过将文件另存为.txt,然后在Excel中打开文件并将数据从文本编辑器粘贴到Excel中?

我遇到了完全相同的问题-我使用了我在网上看到的:

write.csv(merch_df, file = "merch.reduced.csv", fileEncoding = "UTF-8")
事实上,当打开我的
.xls
文件时。。。。奇怪而令人失望

我和一个小谷歌找到了Kevin Ushey写的这篇很棒的博文,它解释了这一切

使用他提议的功能:

write_utf8 <- function(text, f = tempfile()) {

# step 1: ensure our text is utf8 encoded
utf8 <- enc2utf8(text)

# step 2: create a connection with 'native' encoding
# this signals to R that translation before writing
# to the connection should be skipped
con <- file(f, open = "w+", encoding = "native.enc")

# step 3: write to the connection with 'useBytes = TRUE',
# telling R to skip translation to the native encoding
writeLines(utf8, con = con, useBytes = TRUE)

# close our connection
close(con)

# read back from the file just to confirm
# everything looks as expected
readLines(f, encoding = "UTF-8")

}

write_utf8我遇到了与切夫里埃相同的问题。使用write.csv导出时,日文文本无法在Excel和文本编辑器中正确显示。我发现使用:

readr::write\u excel\u csv(df,“filename.csv”)


已更正此问题。

请在调用
write.csv()
时尝试设置参数
encoding=“UTF-8”
,谢谢您的回复!我已经试过了,但在excel文件中仍然会出现乱码:(