Сохранение нескольких коробчатых диаграмм

Я сделал цикл для создания нескольких коробчатых диаграмм. Дело в том, что я хочу сохранить все блочные диаграммы, не перезаписывая друг друга. Есть предложения?

Это мой текущий код :

boxplot <- list()
for (x in 1:nrow(checkresults)){
    boxplots <- boxplot(PIM[,x], MYC [,x], OBX[,x], WDR[,x], EV[,x], 
                        main=colnames(PIM)[x], 
                        xlab="PIM, MYC, OBX, WDR, EV")
}