Message-ID: <200308052225.h75MPpJH019153@pubhealth.ku.dk>
Date: 2003-08-06T00:25:29Z
From: Arni Magnusson
Subject: windows(record=T) loses last plot (PR#3663)
Dear r-bugs,
It seems like the windows graphics device is having problems
recording plots when they are 5, 9, 13, ... in number. Given
temp <- function(nplt)
{
if(exists(".SavedPlots")) rm(.SavedPlots,pos=1)
for(d in dev.list()) dev.off()
windows(record=T)
for(i in 1:nplt) plot(0,0,pch=as.character(i),cex=4)
}
the results are:
temp(1) # Ok, except PgUp generates unnecessary popup window
temp(2) # Ok
temp(3) # Ok
temp(4) # Ok
temp(5) # After cycling with PgUp and PgDn, plot 5 is lost
temp(6) # Ok
temp(7) # Ok
temp(8) # Ok
temp(9) # After cycling with PgUp and PgDn, plot 9 is lost
temp(10) # Ok
temp(11) # Ok
temp(12) # Ok
temp(13) # After cycling with PgUp and PgDn, plot 13 is lost
...
temp(4n+1)
Regards,
Arni
OS: Windows XP
R: 1.7.1