R语言绘制二维密度图

1047521767

R语言绘制二维密度图二维密度图显示了两个数值变量之间的关系，一个在x轴上表示，另一个在Y轴上表示，与散点图类似，然后计算二维空间中特定区域内的观测数，并用颜色梯度表示。二维密度图有几种类型，以下主要展示二维直方图和Hexbin图的绘图代码。

4 E* [' i0 K; O( XR语言|绘制二维直方图
6 ^6 q$ e( u5 [7 H& U对于2d直方图，plot区域被划分为多个正方形，调用geombin2d（）函数，它提供了一个bins参数，用于控制要显示的bins数量。
6 x9 K9 N0 t" Y1 o
1.先绘制基础的散点图；
##二维直方图
# Library
library(tidyverse)
library(ggplot2)
# n  O$ w  |8 f' B; T0 C
# 读取数据
% m4 a8 E! }4 J& o' ~a <- data.frame( x=rnorm(20000, 10, 1.9), y=rnorm(20000, 10, 1.2) )
/ ]7 u( Y2 M' b( Ib <- data.frame( x=rnorm(20000, 14.5, 1.9), y=rnorm(20000, 14.5, 1.9) )
& K; y, l0 N" g8 \$ }2 v1 l8 ]c <- data.frame( x=rnorm(20000, 9.5, 1.9), y=rnorm(20000, 15.5, 1.9) )
& n" i# z1 M9 A/ @' I2 h0 ldata <- rbind(a,b,c)

#绘制基础的散点图
ggplot(data, aes(x=x, y=y) ) +
, |+ ~* K! s( y  geom_point()
5 R' p) o" P: G; U% |- X


! M1 v# |# c% Y$ a" k2.绘制二维直方图。
; I& c, L& a: T1 T/ N####二维直方图可使用geom_bin2d()函数绘制
#二维直方图默认选项
4 w) o* c+ X  y1 Rggplot(data, aes(x=x, y=y) ) +
  geom_bin2d() +
  d+ k4 `3 K* E& [) t  theme_bw()

7 U" K. v1 t6 j5 ~) b1 f4 S# Bin大小控制与调色板
: C* t+ y& k: o4 j9 k1 U5 Nggplot(data, aes(x=x, y=y) ) +
  geom_bin2d(bins = 70) +
  scale_fill_continuous(type = "viridis") +
4 D; B& a. m; Y7 x  n# O" O3 d  theme_bw()
* _% ?2 b4 R# e9 H2 e
2 p/ R# h  a5 X0 c# s9 h6 Q0 s

R语言|绘制Hexbin图

当显示大型数据集时，散点图很难解释，因为点不可避免地会被覆盖，并且可能不被单独识别出来。hexbin图中将地块划分为多个六边形，图中阴影部分代替了条形图的高度。图形是通过R的hexbin包绘制的。

# Packages
library(hexbin)
' M7 f' `, Y; w% [library(RColorBrewer)

* c$ R5 N* s* Q6 f% R( Z0 R' j7 ~# Create data
  Z7 j" P/ F0 z$ V0 \2 R% `x <- rnorm(mean=1.5, 5000)
y <- rnorm(mean=1.6, 5000)

# Make the plot
bin<-hexbin(x, y, xbins=40)
my_colors=colorRampPalette(rev(brewer.pal(11,'Spectral')))
. o7 p% s3 B& g& ~4 Oplot(bin, main="" , colramp=my_colors , legend=F )
% ?; r6 h% `- K2 c