koh*_*ske 39
这是通过子集化数据的另一种方法:
ggplot(mtcars, aes(mpg, disp)) + facet_wrap(~cyl) +
geom_point(data = subset(mtcars, cyl == 4)) +
geom_line(data = subset(mtcars, cyl == 6)) +
geom_text(data = subset(mtcars, cyl == 8), aes(label = gear))
- 您可以使用`subset =.(cyl == 4)`而不是使用`data`调用来简化代码. (5认同)
- 函数“.”来自包“plyr”，但我认为它不再起作用了 (2认同)
- 最近版本的“ggplot”的替代方法是使用“data = ~subset(.x, cyl == 4)” (2认同)