1.点元素的设置参数:点的样式pch,颜色col、大小cex
在画布上画出pch从0到25的样式,要求随着pch数字的增大,图像呈现由上到下,从左到右进行排列。
plot(1,1,col="white",xlim=c(1,7),ylim=c(1,7))
for(i in c(0:25)){
x<-i%/%5+1
y<-6-i%%5
if(i>=21 & i<=25){
points(x,y,pch=i,bg="red",cex=2)
}else{
points(x,y,pch=i,cex=2)
}
text(x+0.1,y+0.3,labels=paste("pch=",i))
}
## 增加text 才会有每个点的描述。
利用for循环和if ,为pch从21到25的符号添加背景色。if判断语句也可以这样写:
for(i in c(0:25)){
x<-i%/%5+1
y<-6-i%%5
if(length(which(c(21:25)==i)>=1)){
points(x,y,pch=i,bg="red",cex=2)
}else{
points(x,y,pch=i,cex=2)
}
text(x+0.1,y+0.3,labels=paste("pch=",i))
}
2.线条类型的设置
data<-matrix(rep(rep(1:7),10),ncol=10,nrow=7)
plot(data[1,],type="l",lty=0,ylim=c(1,8),xlim=c(-1,10),axes=F,xlab=NA,ylab=NA)
text(0,1,labels="lty=0")
for(i in c(2:7)){
lines(data[i,],lty=i-1)
text(0,i,labels=paste("lty=",i-1))
}
控制线的宽度用lwd.