R语言绘制二维密度图

1047521767

R语言绘制二维密度图二维密度图显示了两个数值变量之间的关系，一个在x轴上表示，另一个在Y轴上表示，与散点图类似，然后计算二维空间中特定区域内的观测数，并用颜色梯度表示。二维密度图有几种类型，以下主要展示二维直方图和Hexbin图的绘图代码。
$ n1 l# n  S# y# N0 o$ ]
4 |6 N6 ?7 o* }1 G# w/ gR语言|绘制二维直方图
对于2d直方图，plot区域被划分为多个正方形，调用geombin2d（）函数，它提供了一个bins参数，用于控制要显示的bins数量。

6 y. Y' e2 E; \$ v0 B$ W+ |* S1.先绘制基础的散点图；
+ s. u2 D5 w6 F, q5 y  |! B  S1 `- p9 l##二维直方图
# Library
) `2 u. ]1 i, F9 c- `library(tidyverse)
7 E. _4 [) C7 mlibrary(ggplot2)
3 h- e+ H! ]3 N& T5 ?
8 G, C3 f& a/ L8 ^/ l1 t1 }# 读取数据
a <- data.frame( x=rnorm(20000, 10, 1.9), y=rnorm(20000, 10, 1.2) )
' D4 f0 u1 n; A' O. Z, vb <- data.frame( x=rnorm(20000, 14.5, 1.9), y=rnorm(20000, 14.5, 1.9) )
c <- data.frame( x=rnorm(20000, 9.5, 1.9), y=rnorm(20000, 15.5, 1.9) )
. T0 X. k9 f' R1 Bdata <- rbind(a,b,c)
- T: q1 M" p6 H" j
#绘制基础的散点图
ggplot(data, aes(x=x, y=y) ) +
+ M% a8 ]9 p8 H& p% ?+ M8 W  geom_point()

5 e. L+ ?# Y+ s# m) }2 B# @

, E0 E; ~7 S8 h  E2.绘制二维直方图。
####二维直方图可使用geom_bin2d()函数绘制
5 S% H# l$ @$ W, F% _#二维直方图默认选项
0 U" ?2 J6 f$ g* ?! N6 fggplot(data, aes(x=x, y=y) ) +
  geom_bin2d() +
  theme_bw()
- F/ G7 t5 G, [" ^9 I9 w! M3 k
# Bin大小控制与调色板
ggplot(data, aes(x=x, y=y) ) +
  geom_bin2d(bins = 70) +
  scale_fill_continuous(type = "viridis") +
  theme_bw()
4 C+ J6 _% M0 |+ x

R语言|绘制Hexbin图

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

- C) X* z5 n0 o# Packages
library(hexbin)
" T6 M7 N; ?9 u  clibrary(RColorBrewer)

1 \; c0 {( j( l6 c# Create data
7 y6 W9 P0 F# \1 e# nx <- rnorm(mean=1.5, 5000)
y <- rnorm(mean=1.6, 5000)

# Make the plot
bin<-hexbin(x, y, xbins=40)
  q$ o  D4 j$ L2 n2 nmy_colors=colorRampPalette(rev(brewer.pal(11,'Spectral')))
plot(bin, main="" , colramp=my_colors , legend=F )
& E8 s' y3 ^. |  T
/ f  g- b9 H4 b2 H