Hello,
Or with base R only,
smooth <- colorRampPalette(c('white', 'darkgrey'))
segments(rep(0,100),seq(-4.5,0,length.out=200),rep(14,200),
seq(0,4.5,length.out=200), col = smooth(200), lwd = 2)
Hope this helps,
Rui Barradas
Em 18-02-2013 23:30, Jim Lemon escreveu:
On 02/19/2013 09:50 AM, J
On 02/19/2013 09:50 AM, Jim Lemon wrote:
Hi Elisabeth,
For a quick hack, try this:
segments(rep(0,100),seq(-4.5,0,length.out=200),rep(14,200),
seq(0,4.5,length.out=200),
col=rgb(seq(0.8,0.5,length.out=200),seq(0.8,0.5,length.out=200),
seq(0.8,0.5,length.out=200)),lwd=2)
and even easier:
libra
On 02/19/2013 01:20 AM, Elisabeth wever wrote:
Hi, Can someone help me with the following? I currently have the following plot:
plot(c(0,14,0,14),c(0,5,0,5),ann = FALSE, xaxs="i", yaxs="i",bty="L" )
polygon(c(0,18,18), c(0,6,0), col='light grey', border = NA)
polygon(c(0,18,18), c(0,2,0), c
Hi, Can someone help me with the following? I currently have the following
plot: plot(c(0,14,0,14),c(0,5,0,5),ann = FALSE, xaxs="i", yaxs="i",bty="L" )
polygon(c(0,18,18), c(0,6,0), col='light grey', border = NA)
polygon(c(0,18,18), c(0,2,0), col='grey', border = NA) However, I would like to
4 matches
Mail list logo