Closed davidhodge931 closed 1 month ago
library(tidyverse) library(ggblanket) library(palmerpenguins) set_blanket() penguins |> gg_point( x = body_mass_g, y = flipper_length_mm, x_limits = c(2875, max(penguins$body_mass_g, na.rm = TRUE)), ) + geom_vline(xintercept = 2875) penguins %>% #or this pipe gg_point( x = body_mass_g, y = flipper_length_mm, x_limits = c(2875, max(.$body_mass_g, na.rm = TRUE)), #and then you can use . ) + geom_vline(xintercept = 2875)
Done