創建只有 x 軸的 plot

Question

我想創建一個沒有 y 軸的氣泡 plot，這意味着 x 軸表示特定值之間的范圍，氣泡的大小對應於“數字”變量。

由於geom_point()需要 ay 變量，我創建了一個只有零值的new列並將其分配給 y 軸。

ggplot(df, aes(x=range, y=new, size = numberPoints)) +
    geom_point(alpha=0.5, shape=19) +
    scale_size(range = c(.1, 24)) +
    scale_y_continuous(breaks = NULL)

但是，它給出了以下結果（y 軸太大）：

我只想要 x 軸上方的氣泡（沒有太多空間），但我找不到辦法。

Answer 1

您可以使用coord_fixed來“減少”您的軸

library(dplyr)
library(ggplot2)

data.frame(x = c(1,2,3,4), size = c(1,1,4,8)) %>% 
  ggplot(aes(x=x, y=1, size = size)) +
  geom_point(alpha=0.5, shape=19) +
  scale_size(range = c(.1, 24)) +
  scale_y_continuous(breaks = NULL)+
  coord_fixed(6)