从ggplot2中的geom_histogram删除水平线

Question

我想绘制一个直方图，其中一些文本在右侧，但是x轴（或直方图的下部）可能延伸到文本。如何删除该行？

library(tibble)  
library(ggplot2)  
library(dplyr)

my_label <- "text"

p <- rnorm(10000) %>%
  as_tibble(.) %>%
  ggplot(., aes(x = value)) +
    geom_histogram(color = 'black', fill = 'grey70', bins = 30) +
    annotate(geom = 'text', x = 15, y = 1500, label = my_label,
             hjust = 1, size = 3, color = "#cc0000") +
    theme_void()

Answer 1

player.object[$(this).data("su")]