BJMDT {spphpr}R Documentation

Mean Daily Temperature Data of Beijing from 1951 to 2012 with the exception of 1968.

Description

The data include the mean daily temperatures (in {}^{\circ}C) of Beijing between 1951 and 2012 with the exception of 1968. Data source: China Meteorological Data Service Centre (https://data.cma.cn/en).

Usage

data(BJMDT)

Details

In the data set, there are five columns of vectors: Year, Month, Day, DOY, and MDT. Year saves the recording years; Month saves the recording months; Day saves the recording days; DOY saves the dates in day of year; and MDT saves the mean daily temperatures (in {}^{\circ}C) corresponding to DOY.

References

Guo, L., Xu, J., Dai, J., Cheng, J., Wu, H., Luedeling, E. (2015) Statistical identification of chilling and heat requirements for apricotflower buds in Beijing, China. Scientia Horticulturae 195, 138-144. doi:10.1016/j.scienta.2015.09.006

Examples

data(BJMDT)
attach(BJMDT)

x    <- as.numeric( tapply(DOY, DOY, mean) )
y    <- as.numeric( tapply(MDT, DOY, mean) )
y.sd <- as.numeric( tapply(MDT, DOY, sd) )

dev.new()
par1 <- par(family="serif")
par2 <- par(mar=c(5, 5, 2, 2))
par3 <- par(mgp=c(3, 1, 0))
plot( x, y, cex = 1.5, xlim = c(0, 367), ylim = c(-10, 30), 
      cex.lab = 1.5, cex.axis = 1.5, type = "n", xlab = "Day of Year", 
      ylab = expression(paste("Mean daily temperature (", degree, "C)", sep="")) )
for(i in 1:length(x)){
  lines(c(x[i], x[i]), c(y[i]-y.sd[i], y[i]+y.sd[i]), col=4)
}
points(x, y, cex = 1.5)
par(par1)
par(par2)
par(par3)

# graphics.off()

[Package spphpr version 0.1.4 Index]