Цветная рамка вокруг нескольких участков

Question

Я хотел бы нарисовать цветную рамку вокруг каждого графического окна мультиплота. Рассмотрим следующий пример:

par(mfrow = c(2, 2))

plot(1, 1)
plot(1, 1)
plot(1, 1)
plot(1, 1)

Выход:

Однако мультиплот должен выглядеть следующим образом:

Как я мог сделать это в R?

Answer 1

Один из способов сделать это - просто использовать функцию box() после каждого графика. Чтобы получить разную толщину линии, я использовал два аргумента: "outer" и "figure", которые указывают, где рисовать прямоугольник.

Итак, код выглядит так

par(mfrow = c(2, 2))

plot(1, 1)
box("outer", col="green4", lwd = 30) # lwd - line tickness/width

plot(1, 1)
box("figure", col="green4",  lwd = 5)  

plot(1, 1)
box("figure", col="green4",  lwd = 5)

plot(1, 1)
box("outer", col="green4",  lwd = 30) 

А на выходе: