rectFill(x1,y1,x2,y2,fg=par("fg"),bg=par("bg"),xinc=NA,yinc=NA,
pch=1,pch.cex=1,pch.col=par("fg"),...)
plot(1:7,type="n",xlab="",ylab="",main="Test of rectFill")
rectFill(1:6,1:6,2:7,2:7,bg=2:7,pch=c("+","*","o",".","#","^"),
xinc=c(0.2,0.1,0.2,0.1,0.2,0.2),yinc=c(0.2,0.1,0.2,0.1,0.2,0.2),
pch.col=1:6)
Run the code above in your browser using DataLab