Pour fermer la dernière fenêtre vous pouvez utiliser dev.off()


data(iris)
plot(iris)
plot(1:10)
dev.off() # ferme le dernier graphique