Как разобрать пустые столбцы в read.table?

 dat="mpg cyl  disp  hp drat    wt  qsec vs am gear carb
       21.0   6 160.0 110 3.90 2.620 16.46  0  1    4    4
       21.0   6 160.0 110 3.90 2.875 17.02  0  1    4    4
       22.8   4 108.0  93 3.85 2.320 18.61  1  1    4    1
       21.4   6 258.0 110 3.08 3.215 19.44  1  0    3    1
                                                         2"

Мне нужно это, как показано ниже, см. строку 6?

    >  read.table(text=dat,fill=T,header=TRUE)
   mpg cyl disp  hp drat    wt  qsec vs am gear carb
1 21.0   6  160 110 3.90 2.620 16.46  0  1    4    4
2 21.0   6  160 110 3.90 2.875 17.02  0  1    4    4
3 22.8   4  108  93 3.85 2.320 18.61  1  1    4    1
4 21.4   6  258 110 3.08 3.215 19.44  1  0    3    1
5  2.0  NA   NA  NA   NA    NA    NA NA NA   NA   NA


>  read.table(text=dat,fill=T,header=TRUE)
   mpg cyl disp  hp drat    wt  qsec vs am gear carb
1 21.0   6  160 110 3.90 2.620 16.46  0  1    4    4
2 21.0   6  160 110 3.90 2.875 17.02  0  1    4    4
3 22.8   4  108  93 3.85 2.320 18.61  1  1    4    1
4 21.4   6  258 110 3.08 3.215 19.44  1  0    3    1
5  NA   NA  NA   NA    NA    NA NA NA   NA   NA    2

r read.table
person showkey    schedule 10.01.2014    source источник
comment
Возможно, вы имеете дело с файлом формата фиксированной ширины? Если это так, используйте read.fwf.   -  person Roland    schedule 10.01.2014
comment
В вашем read.table вы не указываете sep, поэтому 6-я строка начинается с 1-го столбца.   -  person Julien Navarre    schedule 10.01.2014

Ответы (1)


arrow_upward
1
arrow_downward

Я решил это сам.

read.fwf(file=textConnection(dat),fill=TRUE,skip=1,widths=c(12,4,6,4,5,6,6,3,3,5,5)) -> r

unlist(strsplit(y,split="\\s+")) -> colnames(y)   
unlist(strsplit(y,split="\\s+")) -> colnames(r)
person showkey    schedule 10.01.2014