R 如何修复ggplot2中的轴打断？ 数据

我有以下情节：

它是使用以下代码创建的：

ggplot(data=new.data, mapping=aes(x= m.speed*1.09728, y=m.gaptime)) + 
  geom_point(aes(shape=interaction(Vehicle.class,PrecVehClass)), size=3, fill="black") + 
  scale_shape_manual(values=c(1,25,12), name="Vehicle Following Case", 
                     labels = c("Car Following Car", "Truck Following Car", "Car Following Truck")) + 
  stat_smooth(aes(x= m.speed*1.09728, y=m.gaptime, linetype=interaction(Vehicle.class,PrecVehClass)),size=1,color="black",method="loess", alpha=0)  + 
  scale_linetype_manual(values=c("dotted", "solid", "longdash"), name="Vehicle Following Case",
                        labels = c("Car Following Car", "Truck Following Car", "Car Following Truck")) +
  scale_x_discrete(breaks=seq(5,90, by=5)) +
  labs(x='Mean Speed (Km/hr)', y='Mean Time Gap (s)') + 
  theme_bw() + my.theme()

问题

---

您可以看到x轴75上的最后一个勾号位于绘图边界处，左侧的第一个框不包含任何数据。我在scale_离散中尝试了不同的限制和中断，如代码所示，但无法解决此问题。请帮忙。

我们能举一个可复制的例子吗？不过，我会使用scale_x_continuous。我会告诉你，你的代码似乎在设置中断，但不是限制。你需要把两者都设置好。看见