Question

我想使用R和我自己的数据制作地图和饼图组合。这是我的数据的链接。 https://drive.google.com/open?id=1HVpFiwdj6YxDDkoq6PmAYMh9_Q6LR95L

我的目标是带出这样的东西 - enter image description here

我尝试了各种各样的库，但我仍在尝试，但无法获得相同的结果，

这是我的小数据集 1. https://drive.google.com/open?id=1oR99mHsTbm86KEUfs-U3UnbczooIS-E_ 2. https://drive.google.com/open?id=18B-ehTdcCPcpOqGW_0-nnRf2Ft_nIIxr

library(xlsx)
library(ggplot2)
library(maps)
library(ggthemes)
library(mapdata)
library(raster)
library(rgeos)
library(scatterpie)


world <- map_data('world', 'canada')
p <- ggplot(world, aes(long, lat)) +
    geom_map(map=world, aes(map_id=region), fill='grey', color="black") +
    coord_quickmap()
p + geom_scatterpie(aes(x=Longitude, y=Latitude,  group=Name), data=df, 
                           cols=c('Calgary', 'Cobourg', 'Cornwall', 'Dieppe', 'Etobicoke', 'Grande.Prairie', 'Lloydminster', 'Mississauga', 'Newmarket', 'North.York', 
                                    'Oakville', 'Oshawa', 'Ottawa', 'Pickering', 'Red.Deer', 'Richmond.Hill', 'Salmon.Arm', 'Saskatoon', 'Scarborough', 'Stouffville', 
                                    'Surrey', 'Toronto', 'Vancouver', 'Victoria', 'Whitby', 'Woodbridge'), color=NA) + coord_equal()+
  coord_fixed() +
  theme_fivethirtyeight()

我还在尝试，请提出任何建议。感谢

用R中的饼图绘制地图

0 个答案: