覆盖x轴刻度

Question

我正在尝试覆盖x轴刻度线，但没有任何改变。如何更改x轴使其从0到45？

这是我尝试过的：

library('ggplot2')
ggplot(data = diamonds, mapping = aes(y = carat, x = price)) + 
geom_line() + 
theme(axis.text.x=element_text(seq(0:45)))

此外：

ggplot(data = diamonds, mapping = aes(y = carat, x = price)) + 
    geom_line() + scale_x_continuous(breaks = 0:45, labels = seq(0,45))

Answer 1

如果您正在寻找0:45缩放到x-axis的限制而不是在实际x值0到45的位置聚集在一起，您可以将其与略微修改现有代码：

xbreaks <- (0:45) * max(diamonds$price, na.rm = TRUE) / 45
ggplot(data = diamonds, mapping = aes(y = carat, x = price)) + 
  geom_line() + scale_x_continuous(breaks = xbreaks, labels = seq(0,45))

确实如此：将0:45缩放到数据的极限，然后在刚刚通过缩放确定的位置绘制标签序列0:45。