Просто, чтобы добавить к ответу Дирка, вы также можете построить несколько графиков в одном окне, посмотрите на ?par
, в частности на mfrow
параметр
Например, par(mfrow=c(2,2))
даст вам макет 2x2 для вашего сюжета.
Для более сложных макетов см. ?split.screen
и ?layout
Для переключения между устройствами вы можете сделать:
# Create 3 plots
dev.new() # Or X11()
dev.1 <- as.integer(dev.cur())
dev.new()
dev.2 <- as.integer(dev.cur())
dev.new()
dev.3 <- as.integer(dev.cur())
x <- seq(1, 100, 0.1)
# Switch to device 1
dev.set(dev.1)
plot(x, sin(x), "l")
# Switch to device 3
dev.set(dev.3)
plot(x, cos(x), "l")
# Add something to graph #1
dev.set(dev.1)
points(x, cos(x), "l", col="red")
Обратите внимание, что, хотя номера устройств, которые вы храните в dev.1
, dev.2
и dev.3
, в основном будут последовательными (1,2,3), вы всегда должны использовать dev.cur
, чтобы получить номер устройство, поскольку вы не можете с уверенностью предположить, что они будут точно равны 1,2,3 и т. д. (возможно, у вас открыты другие устройства)