SHARE
TWEET

Untitled

a guest Jun 17th, 2019 63 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. p <- ggplot(mtcars, aes(x=cyl, colour=factor(vs))) +
  2.   geom_line(stat = 'count')
  3. dat <- layer_data(p)
  4. p + stat_smooth(data = dat, aes(x, y), inherit.aes = FALSE)
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top