# Use processed existing data set from kent Town, Adelaide
data("processeddata")
data("constants")
# Set data class to be "PriestleyTaylor" to call function
funname <- "PriestleyTaylor"
class(data) <- funname
# Call generic function ET(data, ...) with class "PriestleyTaylor"
results <- ET(data, constants, solar="sunshine hours", alpha = 0.08)
Run the code above in your browser using DataLab