Closed yonicd closed 6 years ago
library(ggplot2) library(ggalt) mtcars$name <- rownames(mtcars) p <- ggplot(data = mtcars, aes(x=mpg,y=disp)) + geom_point() p + geom_spikelines(data = mtcars[mtcars$carb==4,],aes(colour = factor(gear)), linetype = 2) + ggrepel::geom_label_repel(data = mtcars[mtcars$carb==4,],aes(label = name))
Created on 2018-06-22 by the reprex package (v0.2.0).
Created on 2018-06-22 by the reprex package (v0.2.0).