Преобразование CSV в RDS - PullRequest
Новая
       18

Преобразование CSV в RDS

0 голосов
/ 14 сентября 2018

Я конвертирую CSV файл в RDS.Затем я конвертирую этот преобразованный файл RDS обратно в CSV, просто чтобы проверить, было ли преобразование правильным или нет.Но после обратного преобразования некоторые строки были удалены.Также изменился формат некоторых символов.Что можно сделать для правильного преобразования CSV в RDS?

CSV (до преобразования из tss.csv в tss.RDS): 

zipcode centile superzip    rank    city.x  state.x adultpop    households  college income  latitude    longitude   country
1001    60.37489    0   6115    Agawam  MA  12293   4219    0.2206947   73.40212    33.7252151  73.0546241  Street 14, F-7/2, E-7, ICT, وفاقی دارالحکومت اسلام آباد, 44000, ‏پاکستان‎
1002    93.69713    0   975 Amherst Nust Link Road, H-11, ICT, ????? ?????????? ????? ????, 44000, ?????????    14232   5081    0.6852867   82.63116    33.6492414  72.999878   Nust Link Road, H-11, ICT, وفاقی دارالحکومت اسلام آباد, 44000, ‏پاکستان‎
1005    58.31555    0   6511    Barre   MA  3348    1400    0.2051971   73.19553    33.6810126  72.9779288  Service Road West F11, E-11/1, E-11, ICT, وفاقی دارالحکومت اسلام آباد, 44000, ‏پاکستان‎

CSV (после преобразования из tss.RDS в tss.csv): 

X.ff..fe.zipcode    centile superzip    rank    city.x  state.x adultpop    households  college income  latitude    longitude   country
1002    93.69713    0   975 Amherst Nust Link Road, H-11, ICT, ????? ?????????? ????? ????, 44000, ?????????    14232   5081    0.6852867   82.63116    33.6492414  72.999878   "Nust Link Road, H-11, ICT, HA'BÌ /'1'D-©HE* '3D'E ('/, 44000,  ~'©3*'F 

1005    58.31555    0   6511    Barre   MA  3348    1400    0.2051971   73.19553    33.6810126  72.9779288  Service Road West F11, E-11/1, E-11, ICT, HA'BÌ /'1'D-©HE* '3D'E ('/, 44000,  ~'©3*'F "

Почему это дает эту ошибку в преобразовании?Что я должен сделать, чтобы сделать правильное преобразование CSV в RDS?Любой совет?

Код: 

fil<-read.csv("D:/PycharmProjects/tss.csv", header = TRUE, sep="\t", encoding="UTF-8", skipNul = T)
export(fil,"D:/PycharmProjects/tss.rds")


fil<-readRDS("D:/PycharmProjects/tss.RDS")
export(fil,"D:/PycharmProjects/tss.csv")
...