首页
学习
活动
专区
工具
TVP
发布
社区首页 >问答首页 >用ggplot和aes_string制作绘图函数

用ggplot和aes_string制作绘图函数
EN

Stack Overflow用户
提问于 2012-04-04 12:16:32
回答 3查看 10.4K关注 0票数 22

在Hadley Wickham的《ggplot2》一书的第10.3章中,他提到了制作绘图函数。我想制作许多使用刻面的类似图,但我不能引用专栏。如果我所有的参考文献都是美学方面的,那么我就可以使用aes_string,一切都可以正常工作。Facet_wrap似乎没有类似的东西。

library(ggplot2)
data(iris)

这是我想要函数化的图。

pl.flower1 <- ggplot(data=iris, 
                    aes_string(x='Sepal.Length', y='Sepal.Width', color='Petal.Length')) +
                                 geom_point() +facet_wrap(~Species)

如果我不刻面,这是可行的。

flowerPlot <- function(dat, sl, sw, pl, sp){
  ggplot(data=dat, aes_string(x=sl, y=sw, color=pl)) + geom_point()
}
pl.flower2 <- flowerPlot(iris, sl='Sepal.Length', sw='Sepal.Width', pl='Petal.Length')

下面两行中的"sp“应该是什么?一个公式,一个字符串?也许整个方法都是错的。

flowerPlotWrap <- function(dat, sl, sw, pl, sp){
      ggplot(data=dat, aes_string(x=sl, y=sw, color=pl)) + geom_point() +facet_wrap(sp)
    }
    pl.flower3 <- flowerPlotWrap(iris, sl='Sepal.Length', sw='Sepal.Width', pl='Petal.Length', sp= ?????)

除了一个答案之外,我还想指出人们是如何处理这个问题的?

EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/10004847

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档