1

我正在尝试将此 pdf https://www.mountwashington.org/uploads/forms/2018/01.pdf导入到 r 并将其格式化为数据框。有没有办法使用奇怪的标头并有效地获取数据的主要标头(而不是较大的标头,如位置和站)?

通过使用转换器网站将 pdf 转换为 excel 文件,然后手动编辑 excel 中的列/行,然后导入到 r,我能够得到我想要的东西,但这非常低效,我想以某种方式在 r 中完成。我尝试使用 tabulizer 包,但它给了我作为字符的数据并且完全没有组织。

这就是我希望它看起来的样子:

> a
   DAY MAX MIN AVG NORM DEPART HEAT COOL TOTAL..EQUIV. SNOW...ICE AVG.WIND.SPEED..MPH. FASTEST.SPEED      DIR
1    1 -14 -25 -19    6    -25   84    0          0.00        0.0                 55.3            79 310 (NW)
2    2  -7 -23 -15    6    -21   80    0          0.01        0.7                 53.8            84  280 (W)
3    3   7  -7   0    6     -6   65    0             T          T                 39.2            64  280 (W)

这就是我用制表符所能得到的:

 [,1]                                                                                                                                       
 [1,] "WS FORM F-6"                                                                                                                              
 [2,] ""                                                                                                                                         
 [3,] "PRELIMINARY LOCAL CLIMATOLOGICAL DATA"                                                                                                    
 [4,] ""                                                                                                                                         
 [5,] "LATITUDE LONGITUDE"                                                                                                                       
 [6,] "44 DEGREES16 MINUTESNORTH 71 DEGREES  18 MINUTES  WEST"                                                                                   
 [7,] "TEMPERATURE (°F) PRECIPITATION (IN.)"                                                                                                    
 [8,] "DEGREE DAYS TOTAL SNOW & SNOW/ICE ON AVG"                                                                                                 
 [9,] "DAY MAX MIN AVG NORM DEPART HEAT COOL (EQUIV) ICE GROUND-7AM SPEED"                                                                       
[10,] "1 -14 -25 -19 6 -25 84 0 0.00 0.0 23 55.3"

然后是更多的行,更多的无组织数据似乎是从页面中随机抽取的。

任何帮助都会很棒,谢谢!

4

1 回答 1

1

您可以使用tabulizer来提取表。用于locate_areas查找要提取的区域的坐标。

看看这个链接

library(tabulizer)

# I used locate_areas("https://www.mountwashington.org/uploads/forms/2018/01.pdf") 
# to find the area of the table to extract

mw_table <- extract_tables(
  "https://www.mountwashington.org/uploads/forms/2018/01.pdf",
  output = "data.frame",
  area =  list(c(103.49321,  15.79171, 402.56716, 586.74627)),
  guess = FALSE
  )

mw_table[[1]]

然后你只需要更改数据框的名称。

于 2019-04-24T04:24:18.110 回答