Hi everybody,
I apologize for this simple question. I’m running a code which, at each
step of a loop, generates a data frame similar to this one:
d <- rep(1:10, each = 6, len = 60)
a <- rep(0:5, each = 1, len = 60)
v <- rep(sort(runif(5, 30, 50), decreasing = T), each = 1, len = 60)
x <- data.frame(t(cbind(d,a,v)))
I want to create and save plots of the results, once data frames are
created. I’m using this code within the loop, after the creation of the
data frame:
# library(lattice)
svg("eraseMe.svg") # Format doesn’t matter, and name is iteratively created
xyplot(v ~ a | d, x, aspect = 5, type = "o", xlab = "a", ylab = "v")
update(trellis.last.object(),
strip = strip.custom(strip.names = FALSE, strip.levels = i),
par.strip.text = list(cex = 1.1))
dev.off()
where “i” is something as simple as
i <- as.numeric(c(1:10))
It works troublelessly on my laptop (under 32 bits Windows Vista), but I
get the following message when running in computers under ubuntu or 64 bits
Windows 7:
Error in !lattice.getStatus("current.plot.saved", prefix = prefix) :
invalid argument type
Notwithstanding, when I simply copy and paste again the following code,
after getting the message, it works fine (but loop is interrupted).
svg("eraseMe.svg") # No matter the format
xyplot(v ~ a | d, x, aspect = 5, type = "o", xlab = "a", ylab = "v")
update(trellis.last.object(),
strip = strip.custom(strip.names = FALSE, strip.levels = i),
par.strip.text = list(cex = 1.1))
dev.off()
Any suggestion? Thanks a lot!!!!
Paolo
[[alternative HTML version deleted]]
_______________________________________________
R-sig-Geo mailing list
R-sig-Geo@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-sig-geo
