geom_hline(data=data.frame(variety=c(“A”, “B”)), aes(yintercept=c(195.4028, 206.0819)), linetype=”dashed”, color=”Dark blue”) +