更改x轴中断ggplot2

我想让x轴的实际年代代替ggplot2将它们分成两半。我如何将特定的x轴设置为几年？更改x轴中断ggplot2

dput：

df <- structure(list(year = c(1930, 1931, 1932, 1933, 1934, 1935, 1936, 
1937, 1938, 1939, 1940), ppt = c(59.0033808749924, 64.5812917950552, 
66.5926177672304, 59.4756152030825, 54.7584384173037, 73.2530022881949, 
52.152143860761, 62.667460409034, 68.3809388906197, 57.8704092161023, 
62.8957857266413), anom = c(0.820287105396386, 0.897833312663238, 
0.925795519832683, 0.826852283938926, 0.761272325064239, 1.01839068062701, 
0.725038641741477, 0.871226511754963, 0.950657430049865, 0.804536108948638, 
0.874400775857991)), row.names = c(NA, -11L), class = c("tbl_df", 
"tbl", "data.frame"), .Names = c("year", "ppt", "anom"))

代码：

qplot(year, anom, data = df, geom="smooth", main = "Precipitaion ", ylab = "Anomaly", xlab = "", scale_x_continuous(breaks=seq(1930, 1931, 1932, 1933, 1934, 1935, 1936, 1937, 1938, 1939, 1940), labels = c("1930", "1931", "1932", "1933", "1934", "1935", "1936", "1937", "1938", "1939", "1940")))

输出：

来源

2015-10-17 Vedda

选项1：使它们成为因子;选项2：让他们成为角色;选项3：将它们转换为实际的日期。 – hrbrmstr

因为year是数字，所以可以像这样设置中断：'ggplot（df，aes（year，anom））+ geom_smooth（）+ scale_x_continuous（breaks = seq（1930,1940,2））''。我将主要间隔设置为2，但您当然可以将其设置为任何您喜欢的。 – eipi10

此代码应该工作，

grp = ggplot(df,aes(x=year,y=anom)) + 
     geom_smooth() + 
     labs(title="Precipitaion", y="Anomaly", x = "") 
grp + scale_x_continuous(breaks=seq(1930, 1940, 1))

seq的语法也是seq(start,end,step-by)。

来源

2015-10-17 22:53:04

这工作。谢谢！ – Vedda

更改x轴中断ggplot2

回答

相关问题