2016-04-26 6 views
0

Importieren der .dat-Datei in die R-Konsole. In der Hoffnung, eine saubere Tabelle zu bekommen, damit ich sie wieder in CSV konvertieren und mit anderen CSV-Dateien in Excel bearbeiten kann.R Datenreinigung fehlgeschlagen: .dat zum Säubern des Datenrahmens zum Säubern der CSV-Datei

Unten ist die gesamte R-Konsole Sitzung. Die Tabelle sieht in der Konsole ausgerichtet aus, wird jedoch bei CSV-Export nicht angezeigt. Probieren Sie den Code aus und sehen Sie, was passiert.

sun <- readLines("http://www1.ncdc.noaa.gov/pub/data/ccd-data/pctpos15.dat") 
head(sun) 
sun <- read.table("http://www1.ncdc.noaa.gov/pub/data/ccd-data/pctpos15.dat", header=TRUE, sep=',') 
Warning messages: 
1: In scan(file, what, nmax, sep, dec, quote, skip, nlines, na.strings, : 
    EOF within quoted string 
2: In scan(file, what, nmax, sep, dec, quote, skip, nlines, na.strings, : 
    number of items read is not a multiple of the number of columns 
sun <- read.table("http://www1.ncdc.noaa.gov/pub/data/ccd-data/pctpos15.dat", header=TRUE, sep=' ') 
Error in scan(file, what, nmax, sep, dec, quote, skip, nlines, na.strings, : 
    line 1 did not have 87 elements 
sun <- read.table("http://www1.ncdc.noaa.gov/pub/data/ccd-data/pctpos15.dat", header=TRUE) 
Error in scan(file, what, nmax, sep, dec, quote, skip, nlines, na.strings, : 
    line 9 did not have 15 elements 
sun <- read.csv("http://www1.ncdc.noaa.gov/pub/data/ccd-data/pctpos15.dat", header=TRUE) 
sundf <- data.frame(sun) 
write.csv(sundf, "sun.csv") 

Zweiter Versuch:

sun <- read_fwf("http://www1.ncdc.noaa.gov/pub/data/ccd-data/pctpos15.dat", col_positions = fwf_positions()) 
Error in stopifnot(length(start) == length(end)) : 
    argument "start" is missing, with no default 
+0

Diese Daten nicht begrenzt ist, ist eine brauchbare Art und Weise; Es ist wirklich in einem Format mit fester Breite. Verwenden Sie 'read.fwf' anstelle von' read.table'. Weitere Informationen finden Sie in der Dokumentation (oder verwenden Sie 'read_fwf' aus dem' readr'-Paket, das effizienter ist). – MrFlick

Antwort

0

Das funktionierte perfekt:

sun <- read_table("http://www1.ncdc.noaa.gov/pub/data/ccd-data/pctpos15.dat") 
Verwandte Themen