if (FALSE) {
destination <- tempfile("wms", fileext = ".tiff")
copernicus_wms2geotiff(
product = "GLOBAL_ANALYSISFORECAST_PHY_001_024",
layer = "cmems_mod_glo_phy-thetao_anfc_0.083deg_P1D-m",
variable = "thetao",
region = c(-1, 50, 7, 60),
destination = destination,
width = 1920,
height = 1080
)
}
Run the code above in your browser using DataLab