View source: R/climate_by_stage.R
| climate_by_stages | R Documentation |
Summarise the climate variable by growth stages
climate_by_stages(
climates,
sowing,
emergence,
heading = NULL,
flowering = NULL,
maturity,
latitude
)
climates |
a data.frame for climate records |
sowing |
date. an vector of sowing date |
emergence |
numeric (days after sowing). an vector of emergence date |
heading |
numeric (days after sowing). an vector of heading date (optional. see details) |
flowering |
numeric (days after sowing). an vector of flowering time (optional. see details) |
maturity |
numeric (days after sowing). an vector of maturity time |
latitude |
latitude |
Define of growth stages
S0: From start of year to emergence
S1: From emergence to flowering time - 300Cd
S2: From flowering time - 300Cd to flowering time + 100Cd
S3: From flowering time + 100 Cd to flowering time + 600Cd
S4: From flowering + 600Cd to maturity
Climate variables
stage: defination of stages
n: Number of days in each stage
avgt: average temperature (C)
sum.tt: total thermal time (Cd) with base temperature 0C
avg.mint: average minimum temperature
avg.maxt: average maximum temperature
sum.rain: total rainfall
avg.evap: average evapration
avg.radn average radiation
hot.days: number of hot days (daily maximum temperature is more than 30C)
very.hot.days: number of very hot days (daily maximum temperature is more than 35C)
frost.days: number of frost days (daily minimum temperature is less than 0C)
hot.sum: total thermal time above 30C of hot days (daily maximum temperature is more than 30C)
very.hot.sum: total thermal time above 35C of very hot days (daily maximum temperature is more than 35C)
frost.sum: total thermal time below 0C of frost days (daily minimum temperature is less than 0C)
vpd: vapour-pressure deficit
te: transpiration efficiency
bio.radn: bio.radn
bio.water: bio.water
bio.tt: bio.tt
ptq: photothermal quotient
avt.diffuse.radn: average diffuse radiation
a data.frame for summarised climate variable by stages. See details for more information.
if (FALSE) {
sowing <- rep(as.Date("1981-05-01"), 10)
emergence <- rep(10, 10)
heading <- NULL
flowering <- runif(10) * 20 + 50
maturity <- runif(10) * 20 + 100
latitude <- -27
res <- climate_by_stages(climates = climates,
sowing = sowing,
emergence = emergence,
heading = heading,
flowering = flowering,
maturity = maturity,
latitude = latitude)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.