R 表返回最后一列的额外内容

R 表返回最后一列的额外内容,r,read.table,R,Read.table,我正在尝试从以下URL读取该表: url <- 'http://faculty.chicagobooth.edu/ruey.tsay/teaching/introTS/m-ge3dx-4011.txt' da <- read.table(url, header = TRUE, fill=FALSE, strip.white=TRUE) 这对前4列很有效,例如,我可以查看ew > head(da$ew) [1] -0.019978 0.029733 0.026168 0.

我正在尝试从以下URL读取该表:

url <- 'http://faculty.chicagobooth.edu/ruey.tsay/teaching/introTS/m-ge3dx-4011.txt'
da <- read.table(url, header = TRUE, fill=FALSE, strip.white=TRUE)
这对前4列很有效,例如,我可以查看
ew

> head(da$ew)
[1] -0.019978  0.029733  0.026168  0.013115 -0.269754  0.066550
但是当我试图访问最后一个文件时,我得到了一些额外的输出,这些输出不在txt文件中

> head(da$sp)
[1] -0.035228 0.006639  0.009893  -0.004898 -0.239541 0.076591 
859 Levels: -0.000060 -0.000143 -0.000180 -0.000320 -0.000659 -0.000815 ... 0.163047

我如何摆脱额外的输出?谢谢

这是一个因子的表示

> str(da)
'data.frame':   861 obs. of  5 variables:
 $ date: int  19400131 19400229 19400330 19400430 19400531 19400629 19400731 19400831 19400930 19401031 ...
 $ ge  : num  -0.0619 -0.0099 0.0493 -0.0417 -0.1973 ...
 $ vw  : num  -0.024 0.0137 0.0189 0.0012 -0.2203 ...
 $ ew  : num  -0.02 0.0297 0.0262 0.0131 -0.2698 ...
 $ sp  : Factor w/ 859 levels "-0.000060","-0.000143",..: 226 411 445 42 353 828 613 585 441 684 ...
第58行有一个点而不是一个数字。这对于R来说是足够的信息,可以将变量作为一个因子来处理。一旦您将点更改为NA或修复错误,您将能够很好地读取数据

另一种选择是在读入数据后将点更改为有意义的值,然后强制为数值。下面的语句将强制执行。对安娜

da$sp <- as.numeric(as.character(da$sp))
> str(da)
'data.frame':   861 obs. of  5 variables:
 $ date: int  19400131 19400229 19400330 19400430 19400531 19400629 19400731 19400831 19400930 19401031 ...
 $ ge  : num  -0.0619 -0.0099 0.0493 -0.0417 -0.1973 ...
 $ vw  : num  -0.024 0.0137 0.0189 0.0012 -0.2203 ...
 $ ew  : num  -0.02 0.0297 0.0262 0.0131 -0.2698 ...
 $ sp  : num  -0.03523 0.00664 0.00989 -0.0049 -0.23954 ...
da$sp str(da)
“数据帧”:861 obs。共有5个变量:
$date:int 19400131 19400229 19400330 19400430 19400530 19400531 19400629 19400731 19400831 19400931 19400931 19400931。。。
$ge:num-0.0619-0.0099 0.0493-0.0417-0.1973。。。
$vw:num-0.0240.0137 0.0189 0.0012-0.2203。。。
$ew:num-0.02 0.0297 0.0262 0.0131-0.2698。。。
$sp:num-0.03523 0.00664 0.00989-0.0049-0.23954。。。
da$sp <- as.numeric(as.character(da$sp))
> str(da)
'data.frame':   861 obs. of  5 variables:
 $ date: int  19400131 19400229 19400330 19400430 19400531 19400629 19400731 19400831 19400930 19401031 ...
 $ ge  : num  -0.0619 -0.0099 0.0493 -0.0417 -0.1973 ...
 $ vw  : num  -0.024 0.0137 0.0189 0.0012 -0.2203 ...
 $ ew  : num  -0.02 0.0297 0.0262 0.0131 -0.2698 ...
 $ sp  : num  -0.03523 0.00664 0.00989 -0.0049 -0.23954 ...