2017-07-18 14 views
0

非ASCII文字を含むCSVファイルがあります。私は単にその文字を削除し、私のCSVファイルを読んでみたいです。スキップのみread.tableを使用した非ASCII文字

> tables <- lapply('/.././abc.csv', read.csv,header=F,stringsAsFactors=FALSE,fileEncoding="UTF-8") 
Warning message: 
In scan(file = file, what = what, sep = sep, quote = quote, dec = dec, : 
    invalid input found on input connection '/.././abc.csv' 
> df= suppressWarnings(do.call(rbind, tables)) 

これは完全なファイルではありません。非ASCII文字の前にのみレコードを読み込みました。これは、非ASCIIシャッターの後のすべてのレコードをスキップしました。

iconv('/.././abc.csv', "latin1", "ASCII", sub="")はxをベクターとして期待しているため使用できません。

cat '/.././abc.csv' 
88036,120,151036.656250,2017-07-17 22:27:49,17-07-17 22:27:49 
88036,120,151036.671875,2017-07-17 22:27:53,17-07-17 22:27:53 
88036,310,151036.687500,2017-07-17 22:27:58,17-07-17 22:27:58 
88036,310,151036.703▒▒F▒▒B▒▒▒D▒%▒▒▒2▒T▒▒K222642,17-07-17 22:28:03,2017-07-17 22:28:03 
88036,310,151036.484375,2017-07-17 22:26:54,17-07-17 22:26:54 
88036,310,151036.500000,2017-07-17 22:26:59,17-07-17 22:26:59 

CSVファイルを読み取った後、最後の2レコードをスキップしています。助けてください。

答えて

0

あなたが最初にし、それを読めば、あなたが

あなたは data.table

としてあなたのcsvファイルを読むことを想定し

td <- td[,lapply(.SD,function(x){ iconv(x, "latin1", "ASCII", sub="")})]

を何をします

関連する問題