R: replace x11() with dev.new().