Skip to content

package vars: save plots

2 messages · Koboltschnig, Rose-Gerd, David Winsemius

Original
Koboltschnig, Rose-Gerd
# 
hello,

i use the vars package and would like to save the plots plotted with the
plot method for objects with class attribute varest etc.
so, if 
	library(vars)
	data(Canada)
	var.canada <- VAR(Canada)
then
	plot(var.canada)
produces a plot for every of the four variables. one has to press return
to get the next plot ("waiting to confirm page change... "). it is only
possible to confirm the page change, but not to save the plot - only for
the last one one gets the options "save", "print" ...

also when i call 
	png(file=var.png)
	plot(var.canada)
	dev.off()
i only get the last plot.

how can i save the four plots, not only the last one?

thanks in advance,
rose
David Winsemius
# 
You do not mention your OS, so further details may be needed.  
Graphical output can be constrained by machine details.  As a first  
step, why not try a format that has multiple page possibilities such  
as pdf  ... this gives me 4 pages:

  pdf(file ="outtest.pdf")
  ?lm
  ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
  trt <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
  group <- gl(2,10,20, labels=c("Ctl","Trt"))
  weight <- c(ctl, trt)
  anova(lm.D9 <- lm(weight ~ group))
#Analysis of Variance Table
#
#Response: weight
#          Df Sum Sq Mean Sq F value Pr(>F)
#group      1 0.6882  0.6882  1.4191  0.249
#Residuals 18 8.7292  0.4850
  plot(lm.D9)
  dev.off()