我的最小示例：
test_df <- data.frame(Year = 1929:2021,
mydata = 1:93)
ggplot(test_df, aes(x = Year, y = mydata ))
geom_line()
labs(y = "S&P 500 EPS / Nominal GDP Normalized")
theme_bw()
theme(axis.title.x = element_text(size = 18, face = "bold"),
axis.title.y = element_text(size = 18, face = "bold"),
axis.text.x = element_text(size = 14),
axis.text.y = element_text(size = 14)
)
如果您運行它，您將看到最后一個 x 軸標簽 (2025) 僅部分可見 - 它在右側被截斷。如何使繪圖區域稍微小一些，以便最后一個 x 軸標簽可見？如果右邊有圖例，這不是問題，但鑒于我沒有圖例，似乎需要不同的解決方案。
真誠的，并提前非常感謝
托馬斯飛利浦
uj5u.com熱心網友回復：
ggplot(test_df, aes(x = Year, y = mydata ))
theme(
axis.text.x = element_text(size = 14),
plot.margin = margin(, 2, , , "cm")
)
您可以在主題系統中使用邊距功能。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/523452.html
標籤：rggplot2轴标签
上一篇：r誤差線和y軸標簽不按順序排列