Skip to content

Miscalculated Kc on cycle ovelapping 2 civil years

On the following example:

crop_params <- CropWat::get_crop_params("FAO-GRAPES-W")
crop_params$sowing_date <- "10-01"

meteo <- ZH_3_clim[ZH_3_clim$Date >= as.Date("2010-01-01") &
                   ZH_3_clim$Date <= as.Date("2014-12-31"), ]

cw_input <- CropWat::CW_create_input(cp = crop_params,
                            DatesR = meteo$Date,
                            ETo = meteo$ETP,
                            P = meteo$Ptot,
                            soil_depth = 1,
                            AWC = 100)
plot(cw_input)

We obtainsomething like this:

image

The value of Kc is invariant at 0.3 whereas it should vary between 0.3 and 0.7 depending on the crop period.