Exemple of use with custom params for sowing date and crop parameters

Add details in CW_create_input documentation for how to use the argument cp instead of crop.

Example to add in CW_create_input?

library(CropWat)

crop_params <- get_crop_params("FAO-MAIZE")
crop_params

# on modifie la durée de la première phase de développement
crop_params$Lini <- 25

# Import example climate dataset
data(ZH_3_clim)

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

# Crop params modifiés et date de semis définie
cw_input <- CW_create_input(DatesR = meteo$Date,
                            ETo = meteo$ETP,
                            P = meteo$Ptot,
                            soil_depth = 1.2,
                            AWC = 140, 
                            cp = crop_params, # cp à la place de crop
                            sowing_date = "04-15") # Date de semi le 15 avril