if (interactive()) {
native_proxy <-
cms_native_proxy(
product = "GLOBAL_ANALYSISFORECAST_PHY_001_024",
layer = "cmems_mod_glo_phy_anfc_0.083deg_PT1H-m",
prefix = "2022/06/",
pattern = "20220621"
)
plot(native_proxy["zos", 1:1000, 1:500, 1, 1], axes = TRUE)
}
Run the code above in your browser using DataLab