[R] Question about parse and expression

[Gabor Grothendieck]

Try this:

library(lattice)
x <- 1:10
i <- 3
xlab <- as.expression(substitute(beta[i] * x[i] + epsilon, list(i = i)))
xyplot(x ~ x, xlab = xlab)


On 6/6/07, Nitin Jain <nj7w at yahoo.com> wrote:
> Dear R-users,
>
> In the following example, I would like to see my ylabel as: "beta[3] * x[3] + epsilon" (where beta and epsilon are replaced by their mathematical symbols).
>
> Please advise.
>
> Thanks.
>
> Nitin
>
>
> i <- 3
>
> ee <- expression(beta[i] * x[i] + epsilon)
>
> xyplot(1:10~ 11:20,
>       ylab = parse(text=ee)
>       )
>
>
>
>
>
> ____________________________________________________________________________________
> 8:00? 8:25? 8:40? Find a flick in no time
>
> ______________________________________________
> R-help at stat.math.ethz.ch 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.
>