Skip to content

Instantly share code, notes, and snippets.

@mdsumner
Last active August 28, 2025 00:31
Show Gist options
  • Save mdsumner/d3966592a095c69a626428c1447e58f7 to your computer and use it in GitHub Desktop.
Save mdsumner/d3966592a095c69a626428c1447e58f7 to your computer and use it in GitHub Desktop.

Install sooty

#install.packages("remotes")
remotes::install_cran("sooty")

Read the latest ice data we have for antarctica-amsr2-asi-s3125.

library(sooty)
src <- datasource("antarctica-amsr2-asi-s3125-tif")
files <- src@source ## this is "live" so we can always re-run this to get latest catalog

library(terra)
ice <- rast(files$source[nrow(files)])
ice

This data is a bit "raw", so we clean up.

ice[ice > 100] <- NA
ice <- ice * 1
plot(ice)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment