[R] Alphabetic labels on multi-plot graphics
Eduardo de Oliveira Horta
eduardo.oliveirahorta at gmail.com
Tue Jan 11 23:12:58 CET 2011
Thanks,
I wasn't even aware that 'letters' was there.
Best regards
On Tue, Jan 11, 2011 at 6:08 PM, David Winsemius <dwinsemius at comcast.net> wrote:
>
> On Jan 11, 2011, at 2:06 PM, Eduardo de Oliveira Horta wrote:
>
>> Is there a way to achieve
>>
>> lbl=c("a", "b", "c", "d")
>>
>> opar <- par(mfrow=c(2,2), ann=FALSE)
>> for (t in 1:4){
>> plot(seq(from=1,to=2*pi,length=100),
>> sin(t*seq(from=1,to=2*pi,length=100)), type="l")
>> title(main=paste("(", lbl[t], ")", sep=""))
>> }
>> par(opar)
>
> opar <- par(mfrow=c(2,2), ann=FALSE)
> for (t in 1:4){
> plot(seq(from=1,to=2*pi,length=100),
> sin(t*seq(from=1,to=2*pi,length=100)), type="l")
> title(main=bquote("("*.(letters[t])*")") )
> }
> par(opar)
>
>> without having to use an object like 'lbl'?
>
> (You obviously need something from which to construct the titles.)
>
>>
>> More generally: is it possible to iteratively (as in a loop) add
>> alphabetic titles to multi-plot graphics when the range over which 't'
>> above varies is of an arbitrary length? It is important that
>> ann=FALSE, because I don't want the axes labels.
>>
>> Thanks in advance, and best regards.
>>
>> Eduardo Horta
>>
>> ______________________________________________
>
> David Winsemius, MD
> West Hartford, CT
>
>
More information about the R-help
mailing list