[Rd] "trace" argument in legend() (PR#2578)

jerome@hivnet.ubc.ca jerome@hivnet.ubc.ca
Mon Feb 24 18:57:05 2003


Full_Name: Jerome Asselin
Version: 1.6.2
OS: RedHat Linux 7.2
Submission from: (NULL) (142.103.173.179)



Should be an easy fix...

Consider the examble below:

plot(0,0)
legend(0,0,c("Hello!","Hi!"),pch=1:2,lty=1:2,trace=T)

It gives the following trace:

> plot(0,0)
> legend(0,0,c("Hello!","Hi!"),pch=1:2,lty=1:2,trace=T)
  xchar= 0.05178 ; (yextra,ychar)= 0 0.07941
  rect2(0,0, w=0.3474, h=0.2382...)
  segments2(0.015540.01554,-0.07941-0.1588, dx=0.1036, dy=0, ...)
  points2( 0.06732 0.06732 , -0.07941 -0.1588 , pch= 1 2 ...)

On the line starting by "segment2", the coordinates are not separated
by a space like on the line starting by "points2".

My recommendation is to remove the option `sep = ""' in this part of
code in legend().

[...]
        if (trace)
            catn("  segments2(", xt[ok.l] + x.off * xchar, ",",
                yt[ok.l], ", dx=", seg.len * xchar, ", dy=0, ...)",
                sep = "")
[...]

Sincerely,
Jerome Asselin