4516
0
2023-07-02 22:00:00
110
48
196
28
地区人口数 city.xlsx 下载链接: https://pan.baidu.com/s/1TEMtydV0nhu_R_OVc5Cl9w  提取码: kg9n  # city_level -------------------------------------------------------------- install.packages("hchinamap") install.packages("readxl") install.packages("dplyr") library(hchinamap) library(readxl) library(dplyr) #https://htmlcolorcodes.com #导入地图chinadf dir <- tempdir() download.file('https://czxb.github.io/br/chinadf.rda',         file.path(dir, 'chinadf.rda')) load(file.path(dir, 'chinadf.rda'), verbose = TRUE) # 导入地区人口数 # city.xlsx必须放在当前工作路径下;否则需要在read_excel("population.xls”)的双引号中写明文件路径 city <- read_excel("city.xlsx") # 筛选广东地区 gd <- chinadf %>% filter(region == "Guangdong") #合并数据 data <- merge(gd, city, by = "name") hchinamap(name = data$name,       value = data$population,      region = "Guangdong",      itermName = "常住人口",      title = "2022年广东省各地区常住人口(万人)",       minColor = "#83E7F7",      maxColor = "#074D66",      legendLayout = "vertical",      legendAlign = "left",      legendVerticalAlign = "top",      hoverColor = "#a4edba" )  # 筛选福建地区 fj <- chinadf %>% filter(region == "Fujian") #合并数据 data <- merge(fj, city, by = "name") hchinamap(name = data$name,       value = data$population,      region = "Fujian",      itermName = "常住人口",      title = "2022年福建省各地区常住人口(万人)",       minColor = "#99FBC3",      maxColor = "#037A35",      legendLayout = "vertical",      legendAlign = "left",      legendVerticalAlign = "top",      hoverColor = "#07F8DB" )  # 筛选浙江地区 zj <- chinadf %>% filter(region == "Zhejiang") #合并数据 data <- merge(zj, city, by = "name") hchinamap(name = data$name,       value = data$population,      region = "Zhejiang",      itermName = "常住人口",      title = "2022年浙江省各地区常住人口(万人)",       minColor = "#DDA9F5",      maxColor = "#660693",      legendLayout = "vertical",      legendAlign = "left",      legendVerticalAlign = "top",      hoverColor = "#07F8DB" )
《精通Excel数据统计与分析》,《Eviews实战与数据分析》作者。发布R、Eviews、Excel, 统计学、经济计量学教学视频。
Lizongzhang
208/610
loading
加载中...
SPSS 图表构建器绘制簇状条形图
5005播放
SPSS 如何自动生成三线表?
10.4万播放
Mac OS下的Eviews 12 无法导入Excel数据的解决办法
2363播放
SPSS 如何解决图表中的字符串变量显示不全?
5112播放
playing
如何用R绘制省辖市热力地图?hchinamap函数(代码和数据文件在简介中)
4516播放
如何用R绘制中国省区热力地图?hchinamap()函数(代码在简介中)
1.5万播放
统计学(第8版)第7章参数估计习题讲评7.5-7.10
1.7万播放
统计学(第8版)第7章参数估计习题讲评7.1-7.4
6.0万播放
如何从EXCEL中直接调用ChatGPT? 加载项Chatgpt for Excel的使用
6562播放
R如何在相关系数矩阵中标注显著性星号?(代码在简介中)
4128播放
如何从R Studio中直接调用ChatGPT? gptstudio插件
2.5万播放
R 相关系数矩阵的可视化
8631播放
统计学(第8版) 第13章时间序列 习题讲评
2.8万播放
统计学(第8版)第11章回归分析习题讲评
5.2万播放
统计学(第8版) 第10章方差分析习题讲评
4.8万播放
统计学(第8版)第9章分类数据分析习题讲评
2.6万播放
R 列联表的可视化呈现——马赛克图mosaicplot() (代码在简介中)
1847播放
R 列联表的可视化呈现——堆栈百分比条形图 (代码在简介中)
1713播放
R如何计算列联表的行百分比和列百分比?
1409播放
统计学第8章假设检验习题讲评8.9-8.15
1.6万播放
统计学第8章假设检验习题讲评8.1-8.8
5.3万播放
ggplot 如何在条形图上标注各组频数?(代码在简介中)
1888播放
如何利用R绘图理解t分布概率密度曲线的特征?
1402播放
如何利用R绘图理解卡方分布概率密度曲线的特征?(代码在简介中)
2128播放
loading
加载中...
客服
顶部