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()