Re: Easy way to label graphics grids?
- To: mathgroup at smc.vnet.net
- Subject: [mg109303] Re: Easy way to label graphics grids?
- From: Syd Geraghty <sydgeraghty at me.com>
- Date: Wed, 21 Apr 2010 04:30:34 -0400 (EDT)
Hi Ren=E9 & Daniel,
Another suggestion is to customize to your taste:-
graphics == MapThread[
Plot[#1[x], {x, 0, 2 Pi},
FrameLabel -> {"x\n\n" <> #2, #1[x], #1[x], None},
Frame -> True] &, {{Sin, Cos, Tan, Cot}, {"( a )", "( b )",
"( c )", "( d )"}}];
GraphicsGrid[Partition[graphics, 2], ImageSize -> 800]
I believe I got the idea some years back from David Park (because it seems so elegant).
Cheers .... Syd
Syd Geraghty B.Sc, M.Sc.
sydgeraghty at mac.com
Mathematica 7.0.1.0 for Mac OS X x86 (64 - bit) (12th September 2009)
MacOS X V 10.6.1 Snow Leopard
MacBook Pro 2.33 GHz Intel Core 2 Duo 2GB RAM
On Apr 20, 2010, at 2:52 AM, dh wrote:
> On 19.04.2010 11:59, Ren=E9 Wuttke wrote:
>> Hey everyone,
>>
>> do you know if there is an easy way to label the rows and columns of a
>> GraphicsGrid? like this:
>>
>> Label A Graph Graph Graph
>> Label B Graph Graph Graph
>> Label C Graph Graph Graph
>> Label 1 Label 2 Label 3
>>
>> Thanks,
>> Ren==E9
>>
>
> Hi,
> GraphicsGrid does not have a labeling mechanism like Table. Thererfore,=
> you must include the labels into the data. here is a simple example:
>
> g == Plot[Sin[x], {x, 0, 10}];
> GraphicsGrid[{{"label11", g, g}, {"label12", g, g}, {"", "label21",
> "label22"}}]
>
> Daniel
>
> --
>
> Daniel Huber
> Metrohm Ltd.
> Oberdorfstr. 68
> CH-9100 Herisau
> Tel. +41 71 353 8585, Fax +41 71 353 8907
> E-Mail:<mailto:dh at metrohm.com>
> Internet:<http://www.metrohm.com>
>
>