Как ограничить область оси y после уменьшения пространства среди уровней y с помощью `expand` в` scale_y_discrete () `?

Question

Я использовал приведенный ниже код для создания графика.

cleanup = theme(panel.grid.major= element_blank(),
                panel.grid.minor = element_blank(),
                panel.background = element_blank(),
                axis.line = element_line(color = "black"))


ggplot(data = Todo)+ 
  aes(x=Time, y=ID) + geom_line() + labs(x='Date',y="\n Individual") + 
  theme(text = element_text(size = 20),
        axis.title.x =element_text(margin = margin(t = 8, r = 0, b = 0, l = 0)),
        axis.text.x = element_text(angle = 90, hjust = 1,size = 8))+
  scale_x_datetime(labels = date_format("%m-%d %H"),
                   breaks = "18 hours") +
  cleanup

Вот график, который я получил:

Так как я хотел уменьшить пространство между индивидуальными уровнями по оси Y, я использовал линию scale_y_discrete(expand=c(0,5)). Тем не менее, график выглядит следующим образом:

Как я могу ограничить ось Y, чтобы уменьшить график до области, где у меня есть линии ?

Если у вас есть альтернативный код для этого, это тоже Wellcome.