thermalTime: a function to calculate thermal time
In sanchezi/phisStatR: Phenoarch Greenhouse Data Analysis

Description Usage Arguments Details Value Examples

this function calculates the thermal time for an experiment according to several methods

1 2	thermalTime(datain, inSpecie, method, inDateS = NULL, inDateE = NULL, inTemp = NULL)

`datain`	input dataframe of meteo data from phis web service
`inSpecie`	character, studied specie
`method`	character, a method of thermal time's calculation ("parent","baseline")
`inDateS`	a date of sowing or thinning etc... start event ("YYYY-MM-DD")
`inDateE`	a date of harvesting ("YYYY-MM-DD")
`inTemp`	numeric, a baseline temperature for baseline's method

Parent et. al. (2010). Modelling temperature-compensated physiological rates, based on the co-ordination of responses to temperature of developmental processes. Journal of Experimental Botany. 61 (8):2057-2069

if the Parent's model is chosen inTemp must be NULL

The input dataframe is extracted from phis web service (getEnvironment function) and is structured as follow: date, value, sensor, codeVariable and facility

a dataframe

# Example for the model of Parent 2010
library(phisWSClientR)
# connectToPHISWS and getEnvironment are functions of the phisWSClientR library
connectToPHISWS(apiID="ws_1_public", username = "guestphis@supagro.inra.fr",
                password = "guestphis")
tpCount<-getEnvironment(experimentURI="http://www.phenome-fppn.fr/m3p/ARCH2017-03-30",
              facility="http://www.phenome-fppn.fr/m3p/es2",
              variables="leaf temperature_thermocouple sensor_degree celsius")$totalCount
myMeteo<-getEnvironment(experimentURI="http://www.phenome-fppn.fr/m3p/ARCH2017-03-30",
              facility="http://www.phenome-fppn.fr/m3p/es2",
              variables="leaf temperature_thermocouple sensor_degree celsius",
              pageSize=tpCount)$data
test<-thermalTime(datain=myMeteo,inSpecie="maize",method="parent",inDateS="2017-04-02",
                  inDateE="2017-06-15",inTemp=NULL)