ggplot2画图

早在N年前就听说这个包画图不错，一直没机会用，终于等到了。相比前面trendline这个包的可视化功能强大得多。

ggplot2需要使用dataframe，其实就是一个N维数组，

install.packages("ggplot2")

library(ggplot2)

ab<-data.frame(x1,y1)

ggplot(data=ab,aes(x=x1,y=y1))+geom_smooth(method='lm')+geom_point()

但是要求太奇葩，背景，网格线统统去掉，好吧，审美不同

ggplot(data=ab,aes(x=x1,y=y1))+geom_smooth(method='lm',colour="#22AD38")+geom_point(colour="black") + theme(axis.text=element_text(size=12),panel.border = element_blank(),panel.grid.major = element_blank(), panel.grid.minor = element_blank(),axis.line = element_line(colour = "black"))

网上查 了，如果要改变坐标字号和网格字号采用下面方法：

pbsfig <- qplot(raw.score, theta,  data = pbs,geom=c("point","smooth"),method = "loess")

pbsfig + theme(axis.text=element_text(size=16),axis.title=element_text(size=20,face="bold"))

网络上有挺多教程，特别是ggplot2作者的pdf电子书，感慨现在的资源真是丰富，只要取之不尽，现学现用吧

https://www.jianshu.com/p/8efb00ba0387

https://www.cnblogs.com/GhostBear/p/7822504.html