R语言绘图

R语言基础绘图：
普通散点图
柱状图：
饼图：pie()
 Q-Q图
opar <- par(no,readonly=TRUE)
 plot(dose,drugA,type = "b")
par(lty=2,pch=17)

饼图：
pie(x,labels = )
par(mfrow=c(2,2)):将画图的区域分成4个模块
> par(mfrow=c(2,2))
> x <- c(10,12,4,16,8)
> lab <- c("US","UK","CHN","Ger","France")
> pie(x,lab,main="Simple Pie Chart")
pct <- round(x/sum(x)*100)  //求出比例
pie(x,lab,col=rainbow(length(lab)),main="Pie Chart With Percentage")  //添加颜色

library(plotrix)
pie3D(x,lab,explode=0.1，main="3D Pie Chart")
//画三维饼图

fan.plot(x,labels=lab,main="Fan Plot") //扇形饼图

直方图：
hist(x,breaks=12,col="red",xlab="Miles Per Callon")
hist(x,freq=FALSE,breaks=12,col="green",xlab="Mile Per Callon")
rug(jitter(x))
lines(density(x),col="red",lwd=2

> par(mfrow=c(2,2))
> x <- c(10,12,4,16,8)
> lab <- c("US","UK","CHN","Ger","France")
> pie(x,lab,main="Simple Pie Chart")
> pct <- round(x/sum(x)*100)
> pct
[1] 20 24  8 32 16
> lab <- paste(lab," ",pct,"%",sep=" ")
> lab
[1] "US   20 %"    
[2] "UK   24 %"    
[3] "CHN   8 %"    
[4] "Ger   32 %"   
[5] "France   16 %"
> pie(x,lab,col=rainbow(length(lab)),main="Pie Chart With Percentage")
> library(Plotrix)

pie3D(x,explode=0.1,main="3D Pie Chart")
> fan.plot(x,labels=lab,main="Fan Plot")