Yep sorry
I need to use the legend command but am not so good at:
Given this pseudo-code:
point_type<-c("black","gray20","red"....)
...
for (i in 1:dim(m)[1]) {
par(pch=(18+i))
par(fg=point_type[i])
plot(m[i,], type='b', ylim = c(lower, upper), type =
"l", ...)
legend( ???? , legend=rownames(m)[i] ,pch=(18+i)
par(new=T)
}
I want a singlebox appear in the plot, containing the legend; each line of the
legend contains the pch and a name
Thanx
> It is not clear what exactly you are trying to do, but you may want to look
at ?matplot for an alternative to your loop, then look at ?legend for adding
explanations.
>
> Hope this helps,
>
> --
> Gregory (Greg) L. Snow Ph.D.
> Statistical Data Center
> Intermountain Healthcare
> greg.snow at imail.org
> (801) 408-8111
>
>
>
> > -----Original Message-----
> > From: r-help-bounces at r-project.org
> > [mailto:r-help-bounces at r-project.org] On Behalf Of Bruno C.
> > Sent: Monday, May 19, 2008 9:21 AM
> > To: deepayan.sarkar
> > Cc: price_ja; r-help
> > Subject: [R] labels in multiple plot
> >
> >
> > My code is the following:
> >
> >
point_type<-c("black","gray20","red"....)
> > ...
> > for (i in 1:dim(m)[1]) {
> > par(pch=(18+i))
> > par(fg=point_type[i])
> > plot(m[i,], type='b', ylim = c(lower, upper),
> > type = "l", ...)
> > par(new=T)
> > }
> >
> > Now I need to add an 'explanation' to each pch.
> > I would have a box in the upperright corner of the plot
> > containing several rows each one in the format:
> > 'pch symbol': 'explanation'
> >
> > How can I do that?
> >
> > Thanx
> > Bruno
> >
> > ______________________________________________
> > R-help at r-project.org mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide
> > http://www.R-project.org/posting-guide.html
> > and provide commented, minimal, self-contained, reproducible code.
> >
>
>