多个地块周围的彩色边框

Question

我想在多图的每个图窗口周围绘制彩色边框。考虑以下示例：

import telegram
from telegram.ext import Updater
from telegram.ext import MessageHandler
from telegram.ext import Filters

def photo_handler(bot, update):
    file = bot.getFile(update.message.photo.file_id)
    print ("file_id: " + str(update.message.photo.file_id))
    file.download('photo.jpg')

updater = Updater(token='my token')
dispatcher = updater.dispatcher
dispatcher.add_handler(MessageHandler(Filters.photo, photo_handler))

输出：

但是，多图应如下所示：

如何在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) 

输出：