R help - Apr 2013 - Loop for main title in a plot

Hi all,

I have a problem in including my plot in a loop. Here is a simple example
for one plot:

# Plot simple graph with super- and subscript
a<-c(1,2,3,4)
b<-c(1,2,3,4)

plot(x=a,y=b,
    ylab=expression(paste("Apple"["P"])),
    xlab=expression(paste("Banana"^"th")),
   
main=expression(paste(italic("i-")~"4"^"th"~"choice")))

Now I would like to include the titel (main) as a function of the number of
trails
for (trial in 1:nTrials) {
plot(

main=expression(paste(italic("i-")~"trial"^"th"~"choice")))

}

e.g. nTrials = 5
The title should look like this:

5th plot: i ^th choice
4th plot: i-1 ^th choice
3th plot: i-2 ^th choice and so on

I have problems to create that, could you please help me?

Thank you!!

	[[alternative HTML version deleted]]

On Apr 24, 2013, at 9:22 PM, Eva G?nther wrote:
> Hi all,
> 
> I have a problem in including my plot in a loop. Here is a simple example
> for one plot:
> 
> # Plot simple graph with super- and subscript
> a<-c(1,2,3,4)
> b<-c(1,2,3,4)
> 
> plot(x=a,y=b,
>    ylab=expression(paste("Apple"["P"])),
>    xlab=expression(paste("Banana"^"th")),
>   
main=expression(paste(italic("i-")~"4"^"th"~"choice")))
> 
> Now I would like to include the titel (main) as a function of the number of
> trails
> for (trial in 1:nTrials) {
> plot(
> 
>
main=expression(paste(italic("i-")~"trial"^"th"~"choice")))
> 
> }
> 
I have not quite figured out what the exact goal is but this shows how to loop
with expression that have evaluated component:  .... bquote is your friend:

for (trial in 1:length(a)) {
    plot(x=a,y=b,   # you were at the very least missing an x and y argument
        main=bquote( italic(i)-.(trial)^th~choice))
                            }

... and you had too many quoted elements. Plotmath `paste` is usually not
needed. Learn to use * and ~.

David.
> e.g. nTrials = 5
> The title should look like this:
> 
> 5th plot: i ^th choice
> 4th plot: i-1 ^th choice
> 3th plot: i-2 ^th choice and so on
> 
> I have problems to create that, could you please help me?
> 
> Thank you!!
> 
> 	[[alternative HTML version deleted]]
> 
> ______________________________________________
> R-help at 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.
David Winsemius
Alameda, CA, USA

You could use bquote. Something like this:

a<-c(1,2,3,4)
b<-c(1,2,3,4)
nTrials <- length(a)

for (trial in 1:nTrials) { 
  plot(x=a[1:trial], y=b[1:trial],
       ylab=expression(paste("Apple"["P"])),
       xlab=expression(paste("Banana"^"th")),
      
main=bquote(italic("i-")~.(trial)^"th"~"choice"))
}

-----Original Message-----
From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org]
On Behalf Of Eva G?nther
Sent: Donnerstag, 25. April 2013 06:22
To: r-help at r-project.org
Subject: [R] Loop for main title in a plot

Hi all,

I have a problem in including my plot in a loop. Here is a simple example for
one plot:

# Plot simple graph with super- and subscript
a<-c(1,2,3,4)
b<-c(1,2,3,4)

plot(x=a,y=b,
    ylab=expression(paste("Apple"["P"])),
    xlab=expression(paste("Banana"^"th")),
   
main=expression(paste(italic("i-")~"4"^"th"~"choice")))

Now I would like to include the titel (main) as a function of the number of
trails for (trial in 1:nTrials) { plot(

main=expression(paste(italic("i-")~"trial"^"th"~"choice")))

}

e.g. nTrials = 5
The title should look like this:

5th plot: i ^th choice
4th plot: i-1 ^th choice
3th plot: i-2 ^th choice and so on

I have problems to create that, could you please help me?

Thank you!!

	[[alternative HTML version deleted]]

______________________________________________
R-help at 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.