6.5 Raster maps: bomrang package has been archived on Jan 10, 2023 #338
Comments
|
Thanks for opening this! I'm still thinking about the best way to fix it, but we'll definitely need to find an alternative. Wondering if @adamhsparks has any thoughts on this? It'd be nice to use satellite images that cover the same geographic region as the rest of the chapter. |
|
Hi @AnttiRask and @djnavarro, that's a tough one. This functionality does still work. But as BOM has been so steadfast in blocking other programmatic access I just archived the whole package rather than trying to remove the bits that didn't work since it would have greatly reduced the functionality of the package as a whole. So, I've extracted the necessary bits to create a function to be used for this example in listing the imagery before using {curl} to download them if you'd like? That adds more code to the chapter but retains the same workflow. |
|
I don't know about the book, but @adamhsparks, I tried the code and got it to work. I had to move things around a bit, though, because the original was trying to use .ftp_images before it was created. Here's the corrected function: |
|
@djnavarro, if you end up using that method, here's a fun addition to the example code, for your consideration. Because if it's a need to use some time from 'yesterday', why not calculate it programmatically, instead of manually: |
|
Thank you, @AnttiRask, I thought I’d addressed that, but must have still had .ftp_images() in my R session when I tested. |
|
@adamhsparks and @djnavarro, I hope you don't mind, but I actually spent some time with the code Adam provided and tidied it a bit (mainly because I wanted to understand better how it works). What do you think? And then the two blocks from the book, modified: |
|
Thanks for working on this, but I don't think we'd want to include that much code in the book, because it's unrelated to the core purpose of drawing a map. |
|
No worries! I totally get that. Besides, although the files seem to be loading correctly, I ran into other problems when going forward with the code example (no matter which version of that function I used for getting the files). And in any case, it's been a good learning experience! |
|
I don’t mind at all. I hacked together what was originally multipurpose in bomrang to work here. I’m more than happy for someone to polish it .
… On 8 Feb 2023, at 4:17 pm, Antti Rask ***@***.***> wrote:
@adamhsparks <https://github.com/adamhsparks> and @djnavarro <https://github.com/djnavarro>, I hope you don't mind, but I actually spent some time with the code Adam provided and tidied it a bit (mainly because I wanted to understand better how it works).
What do you think?
# Load the packages needed
library(curl)
library(tidyverse)
# The function
get_available_imagery <- function(product_id = "all") {
ftp_base <- "ftp://ftp.bom.gov.au/anon/gen/gms/"
.ftp_images <- function(product_id, bom_server) {
list_files <- new_handle()
handle_setopt(
handle = list_files,
CONNECTTIMEOUT = 60L,
TIMEOUT = 120L,
ftp_use_epsv = TRUE,
dirlistonly = TRUE
)
# get file list from FTP server
con <- curl(
url = ftp_base,
open = "r",
handle = list_files
)
tif_files <- readLines(con)
close(con)
# filter only the GeoTIFF files
tif_files <- tif_files %>%
as_tibble() %>%
filter(str_detect(value, "^.*\\.tif")) %>%
pull()
# check if the Product ID requested provides any files on the server
if (length(tif_files) == 0 | tif_files[1] == ftp_base) {
stop(
str_c(
"\nSorry, no files are currently available for ",
product_id
)
)
}
return(tif_files)
}
tif_list <- .ftp_images(product_id, bom_server = ftp_base)
write_lines(tif_list, file = file.path(tempdir(), "tif_list"))
cat("\nThe following files are currently available for download:\n")
print(tif_list)
}
# The datetime as.character for the upcoming str_subset function
library(lubridate)
yesterday_10pm <-
as.character(floor_date(now() - ddays(1), "day") + dhours(22)) %>%
str_replace_all("-", "") %>%
str_replace_all(":", "") %>%
str_replace_all(" ", "") %>%
str_sub(1, 12)
yesterday_10pm
And then the two blocks from the book, modified:
# List of all the filenames with yesterday, 10pm as the date and time
files <- get_available_imagery() %>%
str_subset(yesterday_10pm)
# Download the files
walk2(
.x = str_c("ftp://ftp.bom.gov.au/anon/gen/gms/", files),
.y = file.path("raster", files),
.f = ~ download.file(url = .x, destfile = .y)
)
—
Reply to this email directly, view it on GitHub <#338 (comment)>, or unsubscribe <https://github.com/notifications/unsubscribe-auth/AAYMIAQD5D2HUUL3UGVMZATWWNJBXANCNFSM6AAAAAATZAZ74M>.
You are receiving this because you were mentioned.
|
|
I (we, my team) are working on a "spiritual successor" to {bomrang} right now at work. We're getting close to putting it here on GitHub after we finalise some more development internally. Right now, I've planned to incorporate this functionality into the new package. I will keep you updated but hope to have something soon. |
|
For the time being, I've simplified the public-facing content so that doesn't say anything about how to obtain geotiff files, and links to the raw github file if anyone wants to use the specific file from the example in the book. Might be worth revisiting once a successor to bomrang is available. |
|
A quick update. The new package is openly available now, https://github.com/DPIRD-FSI/weatherOz. Not on CRAN yet, but this functionality does exist and works, https://dpird-fsi.github.io/weatherOz/reference/get_satellite_imagery.html. I’ll be adding to the functionality soon, support for {terra}, {stars} and raw (matrix). But I do plan to keep the default return as with {bomrang}. So it should drop in here. |
As I was going through 6.5 Raster maps, I found out that the {bomrang} package was removed from CRAN on 2021-04-28.
In addition, the GitHub repository "has been archived by the owner on Jan 10, 2023. It is now read-only", accompanied by this explanation:
"This package has been archived due to BOM's ongoing unwillingness to allow programmatic access to their data and actively blocking any attempts made using this package or other similar efforts."
In any case, it's too bad that the chapter now relies on a package that doesn't work anymore.
The text was updated successfully, but these errors were encountered: