[R] specify size of box around legend

Rainer M Krug Rainer at krugs.de
Mon Mar 14 15:25:14 CET 2016


David L Carlson <dcarlson at tamu.edu> writes:

> Also you can specify the upper left/lower right coordinates of the legend box:
>
> # Get the default positions/sizes
> plot(1, 1)
> a <- legend(x="topleft", legend = x, title = "L 1")
> b <- legend(x="bottomleft", legend = y, title = "L 2")
>
> # Use those to change the box size
> plot(1, 1)
> legend(x=c(a$rect$left, a$rect$left+b$rect$w), y=c(a$rect$top, 
>      a$rect$top-a$rect$h), legend = x, title = "L 1")
> legend(x="bottomleft", legend = y, title = "L 2")

Interesting - I like it.

Thanks,

Rainer

>
> -------------------------------------
> David L Carlson
> Department of Anthropology
> Texas A&M University
> College Station, TX 77840-4352
>
> -----Original Message-----
> From: R-help [mailto:r-help-bounces at r-project.org] On Behalf Of Jim Lemon
> Sent: Saturday, March 12, 2016 9:34 PM
> To: Rainer M Krug; r-help mailing list
> Subject: Re: [R] specify size of box around legend
>
> Hi Rainer,
> You can use the text.width argument and override the calculated legend
> text widths.
>
> Jim
>
>
> On Sat, Mar 12, 2016 at 1:01 AM, Rainer M Krug <Rainer at krugs.de> wrote:
>> Hi
>>
>> assume the following code:
>>
>> --8<---------------cut here---------------start------------->8---
>> plot(1,1)
>> legend(x="topleft", legend = LETTERS[1:10], title = "L 1")
>> legend(x="bottomleft", legend = paste(LETTERS[1:10], letters[1:12],LETTERS[1:10]), title = "L 2")
>> legend(x="topright", legend = LETTERS[1:15], title = "L 3")
>> --8<---------------cut here---------------end--------------->8---
>>
>> The box around L 1 is less wide than the box around L 2 due to automatic
>> sizing of the box.
>>
>> Is there a way of specifying the width of the box, so that L 1 and L 2
>> have the same width?
>>
>> In the same sense: can I also specify the height of the legend, so that
>> L 1 and L 3 have the same height?
>>
>> Thanks,
>>
>> Rainer
>> --
>> Rainer M. Krug
>> email: Rainer<at>krugs<dot>de
>> PGP: 0x0F52F982
>>
>> ______________________________________________
>> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
>> 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.
>
> ______________________________________________
> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
> 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.
>

-- 
Rainer M. Krug
email: Rainer<at>krugs<dot>de
PGP: 0x0F52F982
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 454 bytes
Desc: not available
URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20160314/3a4621e0/attachment.bin>


More information about the R-help mailing list