if (FALSE) {
### Example with Brazil states
see_brazil_states()
image_tmin<-loadROI(variable = "tmin",
region = "brazil",
sub_region = 13) # sub_regions 1:27
image_tmax<-loadROI(variable = "tmax",
region = "brazil",
sub_region = 13)
image_tmean <- tmean(tmax_stack = image_tmax, tmin_stack = image_tmin)
start_date <- c('2000-01-01')
end_date <- c('2017-12-01')
tmean_monthly <- tmean_monthly_stack(tmean_stack = img_tmean,
start_date = start_date,
end_date = end_date)
zoning <- ccrop_zoning(temp_per_month = tmean_monthly,
temp1 = 10 , temp2 = 20,
temp3 = 30, temp4 = 40)
}
Run the code above in your browser using DataLab