删除部分x轴，保留x轴限制

Question

我的图表显示 x 轴上现有值范围之外的文本。

为了使文本处于正确的 y 级别，我使用

coord_cartesian

增加了 x 轴限制。

我想删除部分 x 轴，保留绘图的 x 限制。

我当前的可重现代码

### Loading library
library(ggplot2)

### Initiating data
data(iris)

### Initiating plot
ggplot(data=iris, aes(x=Sepal.Length, y=Species)) + 
  geom_point() + 
  coord_cartesian(xlim=c(4, 10)) + 
  geom_text(aes(y=Species, x=9, label=Species)) + 
  theme_classic()

我的目标

不确定这是否可行

Answer 1

ggplot(data=iris, aes(x=Sepal.Length, y=Species)) + 
  geom_point() + 
  coord_cartesian(xlim=c(4, 10)) + 
  geom_text(aes(y=Species, x=9, label=Species)) + 
  theme_classic() +
  scale_x_continuous(breaks = c(4,6,8)) +
  guides(x = guide_axis(cap = "upper"))