library(raster)
tmpbr <- brick("C3S-LC-L4-LCCS-Map-300m-P1Y-2016-v2.1.1.nc")
writeRaster(tmpbr, filename = tmpbr@data@names, bylayer=T, format="GTiff")
library(raster)
tmpbr <- brick("C3S-LC-L4-LCCS-Map-300m-P1Y-2016-v2.1.1.nc")
writeRaster(tmpbr, filename = tmpbr@data@names, bylayer=T, format="GTiff")