Add an Inverse Rug to a Plot
Adds a rug representation (1D plot) of the data to the plot, but with the coloring inverted.
ruginv(x,ticksize=0.03,side=1,lwd=0.5,col=par("fg"),col.ticks="white",
quiet=getOption("warn") < 0,...)x |
A numeric vector. |
ticksize |
The length of the ticks making up the 'rug'. Positive lengths produce inward ticks. |
side |
On which side of the plot box the rug will appear. Usually 1 (bottom) or 3 (top). |
lwd |
The line width of the ticks. |
col |
Color of the background of the ticks. |
col.ticks |
The color of the ticks. |
quiet |
Logical indicating if there should be a warning about clipped values. |
... |
Further arguments passed to polygon when plotting the background for the ticks. |
Peter Solymos
require(stats) plot(density(faithful$eruptions,bw=0.15)) ruginv(faithful$eruptions,ticksize=-0.05) ruginv(jitter(faithful$eruptions,amount=0.01),side=3,col="lightblue")
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.