无法接收所需的输出

时间:2016-12-30 17:55:29

标签: r readr

我正在使用分配来读取R编程中的固定宽度文件格式,这是我的数据集

http://www.cpc.ncep.noaa.gov/data/indices/wksst8110.for

我使用readr包读取文件并使用下面显示的代码清理数据

library(readr)
x<-read_fwf(file=url("http://www.cpc.ncep.noaa.gov/data/indices/wksst8110.for"),skip=4,fwf_widths=c(12,7,4,9,4,9,4,9,4))
head(x)
y<-x[4]
sum(y)

现在我得到了所需的9列,现在我的任务是找到第4列的总和,我的答案是36540,但所需的答案是32467,任何答案都将不胜感激, 提前完成。

1 个答案:

答案 0 :(得分:0)

您需要将文件下载为 gas.xlsx 而不是 gas.xls

download.file("https://d396qusza40orc.cloudfront.net/getdata%2Fdata%2FDATA.gov_NGAP.xlsx", "gas.xlsx" ,mode="wb")