加入年份和朱利安日作为R中的日期列并绘制它

Question

我有一些数据，其中包含一年中的列和另一年的列。例如，让我们考虑这个虚拟数据：

temp <- rep(runif(730,15,40))
doy <- rep(c(1:365),2)
year <- c(rep(2015,365), rep(2016,365))

我想加入doy和year作为日期列（2015-365格式）。是否有可能处理这种日期格式？ ggplot或基本函数plot如何处理它？<​​/ p>

Answer 1

要将Julian日期转换为Date对象，请使用％j格式。例如：

temp <- rep(runif(730,15,40))
doy <- rep(c(1:365),2)
year <- c("2015","2016")

jdate<-as.Date(paste(year, doy, sep="-"),"%Y-%j") 
df<- data.frame(jdate, temp)

library(ggplot2)
f<-ggplot(df, aes(x=jdate, y=temp))
f+ geom_point() + scale_x_date(date_breaks="6 week", date_labels="%Y-%j")