用ggplot绘制热力图#r

凡柒 凡柒     2022-09-20     492

关键词:

1、绘制中国地图

library("maptools")
china_map = readShapePoly("D:/Astatistics/R/画热力图数据材料/中国省级地图空间数据文件/bou2_4p.shp")       # 读取地图空间数据
plot(china_map)#可以不画

 2*、改变投影方式

library(ggplot2)
ggplot(china_map,aes(x=long,y=lat,group=group)) +
     geom_polygon(fill="white",colour="grey") +
     coord_map("polyconic")

 3、加载和拼接行政信息

x <- china_map@data          #读取行政信息
xs <- data.frame(x,id=seq(0:924)-1)          #含岛屿共925个形状

library(ggplot2)
china_map1 <- fortify(china_map)           #转化为数据框

library(plyr)
china_map_data <- join(china_map1, xs, type = "full")       #合并两个数据框

 4、制作业务工作表,保存为csv。需要NAME行(一定命名为NAME),和绘图指标C1

其中,查看数据包里各省名称

unique(china_map@data$NAME) 

 5、读取业务指标,与地理数据合并

mydata <- read.csv("c:/rstudy/geshengzhibiao.csv")          #读取指标数据,csv格式
china_data <- join(china_map_data, mydata, type="full")          #合并两个数据框
提示:Joining by: NAME

 6、绘制地图

ggplot(china_data, aes(x = long, y = lat, group = group,fill = zhibiao)) +
     geom_polygon(colour="grey40") +
     scale_fill_gradient(low="white",high="steelblue") +  #指定渐变填充色,可使用RGB
     coord_map("polyconic") +       #指定投影方式为polyconic,获得常见视角中国地图
     theme(               #清除不需要的元素
          panel.grid = element_blank(),
          panel.background = element_blank(),
          axis.text = element_blank(),
          axis.ticks = element_blank(),
          axis.title = element_blank(),
          legend.position = c(0.2,0.3)
          )

 7*、计算经纬度平均值添加标签

midpos <- function(x) mean(range(x,na.rm=TRUE)) #取形状内的平均坐标
centres <- ddply(china_data,.(province),colwise(midpos,.(long,lat)))

ggplot(china_data,aes(long,lat))+       #此处语法与前面不同,参考ggplot2一书P85
     geom_polygon(aes(group=group,fill=zhibiao),colour="black")+
     scale_fill_gradient(low="white",high="steelblue") +
     coord_map("polyconic") +
     geom_text(aes(label=province),data=centres) +
     theme(
          panel.grid = element_blank(),
          panel.background = element_blank(),
          axis.text = element_blank(),
          axis.ticks = element_blank(),
          axis.title = element_blank()
          )

 8*、读取省会城市坐标添加标签

province_city <- read.csv("D:/Astatistics/R/画热力图数据材料/省会坐标.csv")  #读取省会城市坐标

ggplot(china_data,aes(long,lat))+
     geom_polygon(aes(group=group,fill=zhibiao),colour="grey60")+
     scale_fill_gradient(low="white",high="steelblue") +
     coord_map("polyconic") +
 geom_text(aes(x = jd,y = wd,label = province), data =province_city)+
     theme(
          panel.grid = element_blank(),
          panel.background = element_blank(),
          axis.text = element_blank(),
          axis.ticks = element_blank(),
          axis.title = element_blank()
          )
参考链接:
1)http://blog.sina.com.cn/s/blog_6bc5205e0102vma9.html #R笔记1:ggplot绘制商务图表--中国分省热力地图
2)https://site.douban.com/182577/widget/notes/10568279/note/257898418/ #R for map (2上)
3)http://www.sohu.com/a/145415161_572440 #R语言可视化-关于ggplot所支持的数据地图素材类型

 

r语言绘图:在地图上绘制热力图

使用ggplot2在地图上绘制热力图######*****绘制热力图代码*****#######interval<-seq(0,150000,25000)[-2]#设置价格区间newpri<-cut(data1$price,interval,labels=F)#设置价格为因子类型newpri<-factor(newpri,levels=1:5,labels=c("250 查看详情

r语言可视化分别使用lattice包和ggplot2包可视化热图(heatmap)并绘制热力图对应的系统树图(dendrogram)实战

R语言可视化分别使用lattice包和ggplot2包可视化热图(heatmap)并绘制热力图对应的系统树图(dendrogram)实战 目录 查看详情

r语言绘制地图热力图

...du.com/s/1jIicFHk先来安装一些的包画个好看的中国地图,使用ggplot调整到平面图,调整投影方式后,图像如下,可以不要theme部分,自己查看效果,会有经纬线等信息。 查看详情

r可视化使用ggplot2创建样本数据热力图(heatmap)

R可视化使用ggplot2创建样本数据热力图(heatmap)目录R可视化使用ggplot2创建样本数据热力图(heatmap)数据加载及变形 查看详情

r语言ggplot2可视化热力图(heatmap)自定义配置图例标签为百分比进行热力图颜色渐变显示(legendtodisplaypercentagesign)

R语言ggplot2可视化热力图(heatmap)、自定义配置图例标签为百分比进行热力图颜色渐变显示(legendtodisplaypercentagesign)目录 查看详情

无需代码绘制出的热力图,0基础小白也能3分钟上手

这几天老李在后台看到有粉丝私信我,问说经常在网上看到这种热力图,自己也想学,但不知道这种动态的热力图要怎么做。其实方法很多,用Excel、FineBI、R语言等都可以实现我分别用这三种方法试了一下1、用Exc... 查看详情

r语言ggplot2可视化相关性分析热力图heatmap使用ggcorrplot函数可视化相关性热力图(correllogram)自定义设置显示上三角形或者下三角形设置显示相关性数值颜色尺度条

R语言ggplot2可视化相关性分析热力图heatmap、使用ggcorrplot函数可视化相关性热力图(Correllogram)、自定义设置显示上三角形或者下三角形、设置显示相关性数值、颜色尺度条目录 查看详情

r语言使用pheatmap绘制热力图(数据归一化行列聚类注释文字角度字体)

R语言使用pheatmap绘制热力图(数据归一化、行列聚类、注释、文字角度、字体)目录 查看详情

r语言ggplot2可视化:可视化时间序列日历热力图日历热力图可以很好地描绘极端值和节日数据特性(calendarheatmap)例如日历上看到股票价格这样的指标的变化,尤其是高点和低点数据

R语言ggplot2可视化:可视化时间序列日历热力图、日历热力图可以很好地描绘极端值和节日数据特性(CalendarHeatmap)、例如、日历上看到股票价格这样的指标的变化,尤其是高点和低点数据目录 查看详情

python热力图绘制方法—新手教程

参考技术A#Python热力图绘制方法热力图的使用场景有 1.描述数据在空间的密集程度,常见有城市热力图,区域热力图2.描述多个变量之间相关性高低程度#step1准备数据集,读取excel列表内容,usecols=index,这里是表里的第一列不... 查看详情

r语言ggplot2可视化热力图(密度图)并使用scale_fill_continuous函数自定义图像的色彩梯度(colourgradient)自定义设置图例中的色彩梯度反序(reverse)

R语言ggplot2可视化热力图(密度图)、并使用scale_fill_continuous函数自定义图像的色彩梯度(scalecolourgradient)、自定义设置图例中的色彩梯度反序(reverse)目录 查看详情

python绘制热力图(代码片段)

最近在建模时有绘制相关系数矩阵热力图的需要,在此记录一下热力图的基本使用这里使用seaborn库中的的heatmap完成热力图的绘制,我们可以根据图中不同方块颜色来判断变量之间相关系数的大小,接下来介绍heatmap的... 查看详情

如何删除 .png 周围的奇怪白边(用 r、ggplot 绘制)?

】如何删除.png周围的奇怪白边(用r、ggplot绘制)?【英文标题】:HowcanIremovethestrangewhitemarginaroundmy.png(plottedwithr,ggplot)?【发布时间】:2013-05-0217:50:27【问题描述】:我将带有ggplot的绘图保存为.png。背景必须是黑色的,但总是有... 查看详情

echarts图表——地图&热力图

参考技术A地图是依据一定的绘制法则,使用制图方法,通过制图综合在一定的载体上,表达地球(或其他天体)上各种事物的空间分布、联系及时间中的发展变化状态绘制的图形。以特殊高亮的形式显示访客热衷的页面区域和... 查看详情

r使用热力图(heatmap)可视化数据集(代码片段)

R使用热力图(heatmap)可视化数据集R使用热力图(heatmap)可视化数据集#安装、加载包install.packages(\'RNHANES\')library(RNHANES)library(tidyverse)******************************************************************************Warningmes 查看详情

.可视化数据分析图表—常用图表的绘制3—散点图,面积图,热力图(代码片段)

第五章.可视化数据分析图5.3常用图表的绘制3—散点图,面积图,热力图本节主要介绍常用图表的绘制,主要包括散点图,面积图,热力图。1.散点图(matplotlib.pyplot.scatter)·散点图主要用来查看数据的... 查看详情

天地图专题七:行政区域标记,热力图(以广西为例)

... 琢磨了一阵。记下来。有需要的可以参考。 比如绘制广西省的热力图,实现思路很简单:给广 查看详情

在arcgis地图上绘制echarts热力图(heatmap)(代码片段)

在Arcgis地图上绘制Echarts热力图(Heatmap)2018-08-30 10:18 【原创】本文地址:https://www.cnblogs.com/qiaoge0923/p/9562304.html  现如今,Echarts在数据可视化方面早已升入化境,已经不再拘泥于简单的饼图柱状图,已然从平面直角坐标系... 查看详情