Advertisement
Guest User

Untitled

a guest
Jun 17th, 2019
66
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.17 KB | None | 0 0
  1. p <- ggplot(mpg, aes(displ, cty)) + geom_point()
  2. levels(mpg$drv)<-c("4","f","r",)
  3. p + facet_grid(drv ~ cyl,labeller = label_bquote(rows=mu=="1x10" .(levels(drv))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement