我想繪制季度資料，其中資訊保存在變數 yq 中為：YYYY Q（例如 2007 Q1），我通過組合年份和季度（1、2、3、4）創建：
df$yq = as.yearqtr(paste(df$Year, df$Quarter), "%Y %q")
環顧網上的例子，我寫了這段代碼，但問題是它不允許我指定我想在 x 軸上顯示的年份 - 或者我似乎無法找到一種方法來應用休息時間這種型別的資料。我有 15 年的資料，想每 3 年只顯示一次標簽，因此唯一的標簽是 2005.Q1、2008.Q1、2011.Q1、2014.Q1、2017.Q1。
感謝提示！
plot = ggplot(df, aes(x = yq, y = rate, color = "red"))
geom_point()
geom_line(aes(y = lin, color = "green"), size = 1)
geom_line(aes(y = quad, color = "brown"), size = 1)
geom_line(aes(y = cube, color = "blue"), size = 1)
geom_line(aes(y = log, color = "pink"), size = 1)
geom_line(aes(y = power_corr, color = "black"), size = 1)
geom_line(aes(y = exp_corr, color = "yellow"), size = 1)
scale_color_identity(name = "Models",
breaks = c("red", "green", "brown", "blue", "pink", "black", "yellow"),
labels = c("Observed", "Linear", "Quadratic", "Cubic", "Log", "Power", "Exponential"),
guide = "legend")
plot
theme(panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.background = element_blank(),
axis.line = element_line(colour = "black"))
theme(axis.text.x = element_text(size = 8, angle=-45, hjust = 0.001),
legend.key = element_rect(color = NA, fill = NA))
labs(title="", x = "Year/quarters", y = "Smoking prevalence")
scale_x_yearqtr(format='%Y.Q%q')
uj5u.com熱心網友回復：
未提供資料，因此我們將使用 x 和 y 向量的簡單示例，并使用帶有指定中斷和格式引數的 scale_x_yearqtr。
library(ggplot2)
library(zoo)
# inputs
x <- as.yearqtr(2000) 0:29
y <- 1:30
qplot(x, y)
scale_x_yearqtr(breaks = seq(min(x), max(x), by = 3), format = "%Y.Q%q")
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/491405.html