geom_dumbell spacing, legends in different places, and multiple aesthetics (timelines)

Question

I saw this interesting way of creating a publication timeline using geom_dumbell, so I created my own by first loading the libraries:

library(tidyver