data(apricotFFD)
data(BJDAT)
X1 <- apricotFFD
X2 <- BJDAT
Year1.val <- X1$Year
Time.val <- X1$Time
Year2.val <- X2$Year
DOY.val <- X2$DOY
Tmin.val <- X2$MinDT
Tmax.val <- X2$MaxDT
DOY.ul.val <- 120
S.arr0 <- seq(63, 66, by = 1)
T0.arr0 <- 3.8
# \donttest{
RES2 <- ADD4( S.arr = S.arr0, T0.arr = T0.arr0, Year1 = Year1.val, Time = Time.val,
Year2 = Year2.val, DOY = DOY.val, Tmin = Tmin.val, Tmax = Tmax.val,
DOY.ul = DOY.ul.val, fig.opt = TRUE, verbose = TRUE)
RES2
RESU2 <- ADD4( S.arr = 65, T0.arr = seq(2, 6, by = 1), Year1 = Year1.val, Time = Time.val,
Year2 = Year2.val, DOY = DOY.val, Tmin = Tmin.val, Tmax = Tmax.val,
DOY.ul = DOY.ul.val, fig.opt = TRUE, verbose = TRUE)
RESU2
# graphics.off()
# }
Run the code above in your browser using DataLab