R：在同一张世界地图上绘制两个不同的数据集

我是R的新手。目前我正试图在世界地图上绘制两个不同的数据集。我正在使用包rworldmap。 我的数据：

带有_data1的数组_的类型是一个列表。第一列（国家）包含国家名称。第二列（Variable1）包含我在地图上表示的数字变量，相同颜色，不同亮度，使用以下代码：

library(rworldmap)

plot_dataset <- function(array_with_data1){
    sPDF <- joinCountryData2Map(array_with_data1,
                          joinCode = "NAME",
                          nameJoinColumn = "Country",
                          mapResolution = "coarse"
    )
    mapParams <- mapCountryData( sPDF,
                           nameColumnToPlot= "Variable1",
                           addLegend=FALSE,
                           oceanCol="lightblue",
                           missingCountryCol=NA
    )
}

map <- plot_dataset(array_with_data1)

库（rworldmap）
plot_数据集图像是共享数据的糟糕方式-请共享R代码以创建这些对象
dput（object）
将为您创建这样的代码。否则，您的问题看起来很好地再现了第一个问题！如果你把这些数据留作图片，这意味着你希望任何潜在的回答者都能重新输入你的数据。学习使用
dput（您的数据框）
。我想说的是，我们中的大多数人都会忽略（抵制）这些问题，并最终关闭它们。我通常会等大约2个小时，然后再投票表决，但其他人会投票表决更快。我已将图像替换为dput（我的_数据帧）。谢谢你的建议。
library(rworldmap)

plot_dataset <- function(array_with_data1){
    sPDF <- joinCountryData2Map(array_with_data1,
                          joinCode = "NAME",
                          nameJoinColumn = "Country",
                          mapResolution = "coarse"
    )
    mapParams <- mapCountryData( sPDF,
                           nameColumnToPlot= "Variable1",
                           addLegend=FALSE,
                           oceanCol="lightblue",
                           missingCountryCol=NA
    )
}

map <- plot_dataset(array_with_data1)