data-raw/create_BOM_forecast_locations.md

In adamhsparks/BOMRang: Australian Government Bureau of Meteorology ('BOM') Data Client

Create BOM Précis Forecast Town Names Database

PRE.fansi SPAN {padding-top: .25em; padding-bottom: .25em};

Get BOM Forecast Town Names and Geographic Locations

BOM maintains a shapefile of forecast town names and their geographic locations. For ease, we’ll just use the .dbf file part of the shapefile to extract AAC codes that can be used to add lat/lon values to the forecast data.table that get_precis_forecast() returns. The file is available from BOM’s anonymous FTP server with spatial data ftp://ftp.bom.gov.au/anon/home/adfd/spatial/, specifically the DBF file portion of a shapefile, ftp://ftp.bom.gov.au/anon/home/adfd/spatial/IDM00013.dbf.

curl::curl_download(
  "ftp://ftp.bom.gov.au/anon/home/adfd/spatial/IDM00013.dbf",
  destfile = paste0(tempdir(), "AAC_codes.dbf"),
  mode = "wb",
  quiet = TRUE
)

new_AAC_codes <-
  foreign::read.dbf(paste0(tempdir(), "AAC_codes.dbf"), as.is = TRUE)

# convert names to lower case for consistency with bomrang output
names(new_AAC_codes) <- tolower(names(new_AAC_codes))

# reorder columns
new_AAC_codes <- new_AAC_codes[, c(2:3, 7:9)]

data.table::setDT(new_AAC_codes)
data.table::setnames(new_AAC_codes, c(2, 5), c("town", "elev"))
data.table::setkey(new_AAC_codes, "aac")

Show Changes from Last Release

To ensure that the data being compared is from the most recent release, reinstall bomrang from CRAN.

install.packages("bomrang", repos = "http://cran.us.r-project.org")

## Installing package into '/Users/adamsparks/Library/R/4.0/library'
## (as 'lib' is unspecified)

## 
## The downloaded binary packages are in
##  /var/folders/hc/tft3s5bn48gb81cs99mycyf00000gn/T//RtmpsDeMjr/downloaded_packages

load(system.file("extdata", "AAC_codes.rda", package = "bomrang"))

(AAC_code_changes <- diffobj::diffPrint(new_AAC_codes, AAC_codes))

## < new_AAC_codes                                            
## > AAC_codes                                                
## @@ 6,7 / 6,7 @@                                            
## ~             aac               town   lon    lat   elev   
##      5: NSW_PT006            Ballina 153.6 -28.84    1.3   
##     ---                                                    
## > 1432:  WA_PT285   Halls Creek Airport 127.7 -18.23  409.4
## > 1433:  WA_PT286 Yampi Sound (Defence) 124.0 -16.77   41.3
## < 1462:  WA_PT287    Karijini (DPAW) 118.5 -22.49  692.4   
## > 1434:  WA_PT287       Karijini (DPAW) 118.5 -22.49  692.4
## < 1463:  WA_PT288  Pemberton (DAFWA) 115.9 -34.41  174.0   
## > 1435:  WA_PT288     Pemberton (DAFWA) 115.9 -34.41  174.0
## < 1464:  WA_PT289 Lancelin (Defence) 115.2 -30.84    7.0   
## > 1436:  WA_PT289    Lancelin (Defence) 115.2 -30.84    7.0
## < 1465:  WA_PT290          Mundaring 116.2 -31.90  300.0   
## < 1466:  WA_PT291     Karijini North 118.4 -22.30  474.0

Save the data

Save the stations’ metadata and changes to disk for use in bomrang.

if (!dir.exists("../inst/extdata")) {
  dir.create("../inst/extdata", recursive = TRUE)
}

AAC_codes <- new_AAC_codes

save(AAC_codes,
     file = "../inst/extdata/AAC_codes.rda",
     compress = "bzip2"
)

save(AAC_code_changes,
     file = "../inst/extdata/AAC_code_changes.rda",
     compress = "bzip2")

Session Info

sessioninfo::session_info()

## ─ Session info ───────────────────────────────────────────────────────────────
##  setting  value                       
##  version  R version 4.0.4 (2021-02-15)
##  os       macOS Big Sur 10.16         
##  system   x86_64, darwin17.0          
##  ui       X11                         
##  language (EN)                        
##  collate  en_AU.UTF-8                 
##  ctype    en_AU.UTF-8                 
##  tz       Australia/Perth             
##  date     2021-03-26                  
## 
## ─ Packages ───────────────────────────────────────────────────────────────────
##  package     * version date       lib source                            
##  assertthat    0.2.1   2019-03-21 [1] CRAN (R 4.0.2)                    
##  cli           2.3.1   2021-02-23 [1] CRAN (R 4.0.4)                    
##  crayon        1.4.1   2021-02-08 [1] CRAN (R 4.0.2)                    
##  curl          4.3     2019-12-02 [1] CRAN (R 4.0.1)                    
##  data.table    1.14.0  2021-02-21 [1] CRAN (R 4.0.4)                    
##  diffobj       0.3.4   2021-03-22 [1] CRAN (R 4.0.4)                    
##  digest        0.6.27  2020-10-24 [1] CRAN (R 4.0.2)                    
##  evaluate      0.14    2019-05-28 [1] CRAN (R 4.0.1)                    
##  fansi         0.4.2   2021-01-15 [1] CRAN (R 4.0.2)                    
##  foreign       0.8-81  2020-12-22 [2] CRAN (R 4.0.4)                    
##  glue          1.4.2   2020-08-27 [1] CRAN (R 4.0.2)                    
##  htmltools     0.5.1.1 2021-01-22 [1] CRAN (R 4.0.2)                    
##  knitr         1.31    2021-01-27 [1] CRAN (R 4.0.2)                    
##  magrittr      2.0.1   2020-11-17 [1] CRAN (R 4.0.2)                    
##  rlang         0.4.10  2020-12-30 [1] CRAN (R 4.0.2)                    
##  rmarkdown     2.7.3   2021-03-15 [1] Github (rstudio/rmarkdown@61db7a9)
##  sessioninfo   1.1.1   2018-11-05 [1] CRAN (R 4.0.2)                    
##  stringi       1.5.3   2020-09-09 [1] CRAN (R 4.0.2)                    
##  stringr       1.4.0   2019-02-10 [1] CRAN (R 4.0.2)                    
##  withr         2.4.1   2021-01-26 [1] CRAN (R 4.0.2)                    
##  xfun          0.22    2021-03-11 [1] CRAN (R 4.0.4)                    
##  yaml          2.2.1   2020-02-01 [1] CRAN (R 4.0.2)                    
## 
## [1] /Users/adamsparks/Library/R/4.0/library
## [2] /Library/Frameworks/R.framework/Versions/4.0/Resources/library

adamhsparks/BOMRang documentation built on Jan. 31, 2023, 4:49 a.m.