[R] problem with legend

[Uwe Ligges]

Bernardo Rangel Tura wrote:

> I have problem with legend command. Please look this script:
> 
>  >dcbv.fm
> Time Series:
> Start = 1980
> End = 2002
> Frequency = 1
>  [1] 2994.023 3388.414 3111.762 2990.967 3077.438 3058.274 3049.934 
> 2974.130
>  [9] 2889.659 2801.790 2631.391 2661.700 2312.526 2518.968 2567.044 
> 2443.952
> [17] 2117.638 2042.461 2025.816 1939.560 1640.775 1583.609 1659.912
> 
>  > dcbv.ms
> Time Series:
> Start = 1980
> End = 2002
> Frequency = 1
>  [1] 3700.239 4076.438 3856.495 3680.345 3871.887 3789.770 3831.173 
> 3768.876
>  [9] 3585.572 3754.374 3372.859 3419.667 3185.194 3319.215 3445.845 
> 3265.214
> [17] 2773.961 2661.904 2669.835 2569.190 2187.719 2217.756 2196.378
> 
>  >plot(dcbv.ms,ylim=c(min(dcbv.fm),max(dcbv.ms)))
> 
>  >lines(dcbv.fm,col=2)
> 
>  >legend(1984,2500,c("DCVB-MS","DCBV-FM"),col=c(1,2),cex=.6,fill=T)


So you want filles boxes? Then you should specify the color in the fill 
argument:

  legend(1984, 2500, c("DCVB-MS", "DCBV-FM"), cex=.6, fill=1:2)

or do you want some lines?

  legend(1984, 2500, c("DCVB-MS", "DCBV-FM"), cex=.6, col=1:2, lwd=2)

Uwe Ligges



> 
> At end of script the legend of plot have only one color: black. I think 
> the legend will have two colors: black and red.
> 
> Where I make mistake?
> 
> 
> version
>          _
> platform i386-pc-mingw32
> arch     i386
> os       mingw32
> system   i386, mingw32
> status
> major    2
> minor    0.1
> year     2004
> month    11
> day      15
> language R
> 
> Thanks in advance
> 
> Bernardo Rangel Tura, MD, MSc
> National Institute of Cardiology Laranjeiras
> Rio de Janeiro Brazil
>