Экспорт карты, созданной с помощью rworldmap, в png - PullRequest
0 голосов
/ 30 января 2019

Я создал карту на R с пакетом rworldmap следующим образом:

library(rworldmap)


fta.df <- data.frame(country = c("CAN", "MEX", "USA"),
                     country = c(1,2,3))

MyMap <- joinCountryData2Map(fta.df, joinCode = "ISO3",
                             nameJoinColumn = "country")
MyMap <- subset(MyMap, continent != "Antarctica")

FTA_map <- mapCountryData(MyMap, nameColumnToPlot="country", 
                          catMethod = "categorical",
                          missingCountryCol = gray(.8), 
                          colourPalette=c("forestgreen","royalblue1", "red3"),
                          mapTitle = "",
                          addLegend = FALSE)

FTA_map$legendText <- c("CAN", "MEX", "USA")            
do.call( addMapLegendBoxes, c(FTA_map,x="bottomleft",title = "title",horiz=FALSE))

Я удовлетворен результатом, но я не знаю, как экспортировать изображение, полученное в .png.

Есть идеи?

1 Ответ

0 голосов
/ 30 января 2019
png("map.png",width=800,height=800,units="px")
MyMap <- subset(MyMap, continent != "Antarctica")

FTA_map <- mapCountryData(MyMap, nameColumnToPlot="country", 
                                                     catMethod = "categorical",
                                                     missingCountryCol = gray(.8), 

colourPalette=c("forestgreen","royalblue1", "red3"),
                                                     mapTitle = "",
                                                    addLegend = FALSE)

 FTA_map$legendText <- c("CAN", "MEX", "USA")            
 do.call( addMapLegendBoxes, c(FTA_map,x="bottomleft",title = "title",horiz=FALSE))
 dev.off()

Посмотрите на это:

https://www.rdocumentation.org/packages/grDevices/versions/3.4.1/topics/png

Вы можете играть с разрешением, используя аргументы png() function

...