qqq <- cbind(c(1:10),c(2:11)) pdf("test.pdf") plot(qqq) dev.off()
Error in dev.off() : cannot shut down device 1 (the null device)