colPointscolPointsLegend(z, Range=range(z, finite=TRUE), nbins=40,
colors=rainbow2(nbins), bb=seqR(Range, length.out=nbins+1), at=pretty2(Range),
labels=at, bg="white", x1=60, y1=99, x2=x1+38, y2=y1-11, mar, mgp=c(1.8, 0.6, 0),
sborder=NA, resetfocus=TRUE, density=NULL, lines=TRUE, atminmax=FALSE,
horizontal=TRUE, labelpos=1, titlepos=3, title="Legend", las=1, ...)colPoints, can be matrix, vector, etc, but must be numericrainbow from blue (lowest) to red (highest value in Range)at. DEFAULT: atsmallPlot. DEFAULT: 60,99smallPlot in relative values (0:100). DEFAULT: internal calculations based on title, labelpos and titlepos.par, but with different defaults. DEFAULT: c(1.8, 0.6, 0)density. DEFAULT: NULLat? DEFAULT: TRUEat? DEFAULT: FALSEx1,x2,y1,y2,labelpos,titlepos,title have different defaults when horizontal=FALSE.colPoints (section examples) for real life examplez <- rnorm(50)
plot(1:10)
colPointsLegend(z=z)
colPointsLegend(z=z, titlepos=2)
colPointsLegend(z=z, horiz=FALSE) # note the different defaultsRun the code above in your browser using DataLab