png("grass.png", width = 2400, height = 1200, units = "px", res=200) title1=paste0("Grass fraction ", as.character(year1), " BP") par(mar=c(5, 5, 1,...
