Horizontal annotations with ggrepel and ggplot2

horizontal.R

library(tidyverse)
library(ggrepel)

set.seed(1234)

data <- tibble(x = seq_len(100),
               y = cumsum(rnorm(100)))

anno_data <- data %>%
  filter(x %% 25 == 10) %>%
  mutate(text = "text")

data %>%
  ggplot(aes(x, y)) +
  geom_line() +
  geom_label_repel(aes(label = text), 
                   data = anno_data,
                   direction = "y",
                   nudge_y = c(-5, 5, 5, 5))

library(dplyr) missing

@shenwei356 dplyr is being loaded as a part of library(tidyverse).