## I would like help in using variable values in plotmath expressions
## in lattice

x <- 1:10
y <- 1:10
pval <- .95

plot(y ~ x, ## works as I want in base graphics
     main=substitute(list(alpha * " = " * group("",list(p),"")),
list(p=pval)))

plot(y ~ x, ## doesn't work as intended: "pval" is displayed
     main=substitute(list(alpha * " = " * group("",list(pval),""))))

try( ## doesn't work: object 'alpha' not found
xyplot(y ~ x,
     main=substitute(list(alpha * " = " * group("",list(p),"")),
list(p=pval)))
)

xyplot(y ~ x, ## doesn't work as intended: "substitute" is displayed
     main=expression(substitute(list(alpha * " = " * group("",list(p),"")),
list(p=pval))))

xyplot(y ~ x, ## doesn't work as intended: "p" is displayed and "pval" is
displayed
     main=expression(list(alpha * " = " * group("",list(p),"")),
list(p=pval)))

xyplot(y ~ x, ## doesn't work as intended: "pval" is displayed
     main=expression(list(alpha * " = " * group("",list(pval),""))))


Thanks
Rich

	[[alternative HTML version deleted]]

