On Sun, Oct 4, 2009 at 3:45 PM, Deepayan Sarkar
<deepayan.sar...@gmail.com> wrote:
>
> Yes, unfortunately the trellis object cannot distinguish between the
> "legend" and the "key" any more.
>
If you are willing to muck around at the grid level you can do it.
First list out the grid objects using grid.ls(). Now looking for 3
grid text objects in proximity we see 3 such objects as descendants of
GRID.frame.215 and we examine the first one which, GRID.text.218,
which indeed contains setosa in its label. Finally we zap the labels
of those three grid text objects.
> library(grid)
> print(fig)
> grid.ls()
GRID.rect.233
plot1.xlab
plot1.ylab
GRID.segments.234
GRID.segments.235
GRID.text.236
GRID.segments.237
GRID.text.238
GRID.segments.239
GRID.points.240
GRID.points.241
GRID.points.242
GRID.rect.243
GRID.frame.215
GRID.cellGrob.217
GRID.rect.216
GRID.cellGrob.219
GRID.text.218
GRID.cellGrob.221
GRID.text.220
GRID.cellGrob.223
GRID.text.222
GRID.frame.224
GRID.cellGrob.226
GRID.rect.225
GRID.cellGrob.228
GRID.text.227
> str(grid.get("GRID.text.218"))
List of 11
$ label : chr "setosa"
$ x :Class 'unit' atomic [1:1] 0
.. ..- attr(*, "unit")= chr "npc"
.. ..- attr(*, "valid.unit")= int 0
$ y :Class 'unit' atomic [1:1] 0.5
.. ..- attr(*, "unit")= chr "npc"
.. ..- attr(*, "valid.unit")= int 0
$ just : chr "centre"
$ hjust : num 0
$ vjust : NULL
$ rot : num 0
$ check.overlap: logi FALSE
$ name : chr "GRID.text.218"
$ gp :List of 6
..$ col : chr "black"
..$ alpha : num 1
..$ lineheight: num 1
..$ fontface : num 1
..$ cex : num 1
..$ font : int 1
..- attr(*, "class")= chr "gpar"
$ vp : NULL
- attr(*, "class")= chr [1:3] "text" "grob" "gDesc"
> grid.edit("GRID.text.218", label = "")
> grid.edit("GRID.text.220", label = "")
> grid.edit("GRID.text.222", label = "")
______________________________________________
R-help@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.
