为什么我用write_csv读出来的文件是乱码？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

因为write.csv不能用append添加，所以我用了write_csv函数
但是我用write.csv读出来是好的，而用write_csv读出来的文件却是乱码的，这是为什么呢？


求解。。。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：write WRI append 不能用 App

传点文件上来，才能给你看看是是什么呀

write_csv()默认是UTF-8编码

jiangbeilu 发表于 2017-1-12 17:41
传点文件上来，才能给你看看是是什么呀

1. a <- c("小明","小红","小王","小李")
   
2. b <- c(6,7,7,5)
   
3. c <- c("男","女","男","男")
   
4. data <- cbind(a,b,c)
   
5. data <- data.frame(data)
   
6. 
   
7. a1 <- c("小花","小刘","小杨","小梁")
   
8. b1 <- c(7,7,6,9)
   
9. c1 <- c("女","女","男","男")
   
10. data1 <- cbind(a1,b1,c1)
    
11. data1 <- data.frame(data1)

复制代码

1. write.csv(data,"e:/data.csv",row.names = F)

复制代码

1. write_csv(data1,"e:/data.csv",append = T)

复制代码

结果就成这样子。。。

houyunhuang 发表于 2017-1-12 18:04
write_csv()默认是UTF-8编码

那我应该如何改变编码格式？

借用你的数据，用write.csv统一使用utf-8格式会比较好。

1. write.csv(data,"data.csv",row.names = F,fileEncoding="UTF-8")
   
2. write_csv(data1,"e:/data.csv",append = T)

复制代码

write.csv写出来的csv文件跟系统有关。我的系统写出来是GB2312.用notepad++查看编码。

write.csv写出来的结果：
write_csv保存的结果：


直接用excel打开csv会出现乱码的。因为两者字符并不统一。建议你用记事本打开，或者notepad++打开，就会看到完整的数据了。

jiangbeilu 发表于 2017-1-12 19:58
借用你的数据，用write.csv统一使用utf-8格式会比较好。

write.csv写出来的csv文件跟系统有关。我的系统 ...

非常感谢！！！