ggplot多重绘图

　R高级实战绘图：

https://www.jianshu.com/p/e2d4a4d3d0d2

https://www.jianshu.com/p/0536cce0acad

 

---------------------------------------待学习

 

 

> install.packages("gridExtra")

> library(gridExtra)

> library(ggplot2)

> p1 <- ggplot(data, aes(x=mpg)) + geom_bar()
> p1
> p3 <- ggplot(data, aes(x=mpg, y=wt)) + geom_point()
> p3
> p2 <- ggplot(data, aes(x=wt)) + geom_bar()
> p2
> grid.arrange(p1,p2,p3,ncol=3)

 

 

> myplot <- ggplot(data=mtcars, aes(x=mpg)) + geom_histogram()

> myplot

> ggsave(file="mygraph.png",plot=myplot,width=5,height=4)
保存，5X4英寸
>help(ggsave)