r - 如何在R中的朱利安日x轴上标记月份

Question

我正在绘制一个图(在 ggplot2 中)，其中 x 轴的范围从朱利安第 1 天到第 365 天。有没有办法将月份标签和刻度线添加到朱利安日轴？

(即，scale_x_date)

谢谢!

Answer 1

你在正确的轨道上 scale_x_date() ，但您的儒略日确实需要先格式化为日期。诀窍是选择一个对您的数据有意义的来源，然后使用 scale_x_date()格式化标签:

library(ggplot2)

# make data
value <- rnorm(365, mean = 0, sd = 5)
jday <- 1:365 # represents your Julian days 1-365; assumes no leap years

# make data frame and add julian day
d <- data.frame(jday = jday, value = value, stringsAsFactors = FALSE)
head(d)

# plot with date labels on x axis    
ggplot(d, aes(x = as.Date(jday, origin = as.Date("2018-01-01")), y = value)) +
  geom_line() +
  scale_x_date(date_labels = "%b")