Nothing
# Author: Robert J. Hijmans
# License GPL3
ET0_PenmanMonteith <- function(temp, relh, atmp, Rn, G, ra, rs) {
d <- cbind(temp, relh, atmp, Rn, G, ra, rs)
.Call('_meteor_ET0_PenmanMonteith', PACKAGE = 'meteor', d[,1], d[,2], d[,3], d[,4], d[,5], d[,6], d[,7])
}
ET0_PriestleyTaylor <- function(temp, relh, atmp, Rn, G) {
d <- cbind(temp, relh, atmp, Rn, G)
.Call('_meteor_ET0_PriestleyTaylor', PACKAGE = 'meteor', d[,1], d[,2], d[,3], d[,4], d[,5])
}
ET0_Makkink <- function(temp, relh, atmp, Rs) {
d <- cbind(temp, relh, atmp, Rs)
.Call('_meteor_ET0_Makkink', PACKAGE = 'meteor', d[,1], d[,2], d[,3], d[,4])
}
ET0_ThornthwaiteWilmott <- function(temp, doy, latitude) {
d <- cbind(temp, doy, latitude)
.Call('_meteor_ET0_ThornthwaiteWilmott', PACKAGE = 'meteor', d[,1], d[,2], d[,3])
}
ET0_ThornthwaiteWilmottCamargo <- function(tmin, tmax, doy, latitude, Pereira=FALSE) {
d <- cbind(tmin, tmax, doy, latitude)
.Call('_meteor_ET0_ThornthwaiteWilmottCamargo', PACKAGE = 'meteor', d[,1], d[,2], d[,3], d[,4], Pereira)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.