Puromycin ggplot2 add points

library(ggplot2)

data(Puromycin)
p6 <- ggplot(Puromycin, aes(x = conc, y = rate, color = state)) +
  geom_smooth(method = "lm", formula = y ~ log(x))
# Type your graphical command(s) here:

Je kunt zo vaak indienen als je wenst. Er wordt enkel rekening gehouden met je laatst ingediende oplossing.