Skip to content

pairs() Legend

3 messages · Ko-Kang Kevin Wang, Uwe Ligges, Duncan Murdoch

#
Hi,

Is it possible to create a legend in a pairs() plot?

For example, suppose I have the following R codes:

 data(iris)
 pairs(iris[1:4], main = "Anderson's Iris Data -- 3 species", 
       pch = 21, bg = c("red", "green3", "blue")[codes(iris$Species)])

How can I created a legend that shows which colour represents to which
Iris species?

Thanks,

Kevin

------------------------------------------------------------------------------
Ko-Kang Kevin Wang
Statistical Analysis Division Leader
Software Developers' Klub (SDK)
University of Auckland
New Zealand

-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-help-request at stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._
#
Ko-Kang Kevin Wang wrote:
What about something like

  data(iris)
  pairs(iris[1:4], main = "Anderson's Iris Data -- 3 species",
    pch = 21, bg = c("red", "green3", "blue")[codes(iris$Species)])
  par(xpd=TRUE)
  legend(0, 1, as.vector(unique(iris$Species)),  
    fill=c("red", "green3", "blue"))

Uwe Logges
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-help-request at stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._
#
On Tue, 25 Sep 2001 22:07:15 +1200 (NZST), you wrote in message
<Pine.SOL.4.21.0109252204270.17045-100000 at stat1.stat.auckland.ac.nz>:
The legend function is the general purpose way to put a legend on a
plot.  For the legend you want, you'd use

 legend(locator(),legend=levels(iris$Species), pt.bg =  c("red",
"green3", "blue"), pch=21)

The locator() function lets you position it manually.  You might want
to put in fixed values, instead.

The default pairs() call gives no space for a legend, so you'll
probably want to use "oma=c(4,4,6,10)" or something to give yourself
some extra space for the legend.

Duncan Murdoch
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-help-request at stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._