编织时，Rworldmap在RMarkdown中绘制两次

Question

我正在尝试使用RMD中的rworldmap绘制地图，当我运行代码时，它仅绘制一次。但是在编织的html文件中，它先绘制没有图例的地图，然后绘制有图例的地图。我不确定如何解决。 我试过保存它，然后只显示图。但是它保存为480x480，这使该图在展开时看起来像是像素化的。 我不确定我是在做错什么，还是knitr或rworldmap有问题。

Countries <- joinCountryData2Map(Country_Sum_data, joinCode = "NAME", 
nameJoinColumn = "Var1")
par(mar=c(0,0,0.2,0),xaxs="i",yaxs="i")

```

```{r plotmap, echo = FALSE, dpi=300, results='hide',fig.keep='all', 
message=FALSE, warning=FALSE, fig.width=10, fig.height=10}

#png('map.png')
mapParams <- mapCountryData( Countries, nameColumnToPlot="Number of 
Respondents Per Country", addLegend=FALSE,numCats = 6 )
do.call( addMapLegend, c(mapParams, legendWidth=0.5,legendIntervals="page", 
legendMar = 10))
#dev.off()
```