关于数据挖掘:R语言绘制ggplot2双色XY面积组合交叉折线图可视化

5次阅读

共计 1198 个字符,预计需要花费 3 分钟才能阅读完成。

原文链接:http://tecdat.cn/?p=25075 

本文显示如何填充 图表中两条穿插线之间的区域。

让咱们尝试用 ggplot2 绘制这个图 .

首先,加载 ggplot2 并生成要在示例中应用的数据框(我应用的是略微批改过的数据集,因而最终后果会与原始图有所不同)。

在 ggplot2 中能够填充两条线之间的区域,然而因为咱们须要线段具备不同的色彩,因而须要一些额定的工作。

> ggplot +
     geom_ribbon

为了扭转两条线交叉点的填充色彩,须要计算交点。

slope1 <- c
intcpt1 <- with
intcpt2 <- with
x2 <- with
y3 <- with

当初,咱们确保计算正确,咱们目视查看交叉点的地位:

> ggplot+ geom_line +
     geom_line +
     geom_point

当我打算为下面应用 geom\_ribbon 生成的图着色时,交叉点也须要以 geom\_ribbon 的模式出现——一个 y3 复制变量就能够做到这一点。

y4 <- y3

显然还须要额定的谬误查看,如上图最右边和最左边的绿点的地位所示——任何两条线都能够有一个交点,超出特定图的范畴。

> cross\[which\] <- NA
>segment <- findIntval

为了使 ggplot2 可能在每个线条交叉处扭转填充色彩,它须要晓得每个黑白区域的终点和起点。因而须要复制两头的交叉点,因为它们将是两个相邻区域的一部分,填充了不同的色彩。

x3 <- c(tail, NA)
y5 <- c(tail, NA)
y6 <- y5

当初须要将两条线的坐标和黑白区域的终点 / 起点组合成一个长格局的数据帧。

> crs1 <- css
> cs2 <- cr\[!is.na\]
> co3 <- rss\[!is.na\]
> names(cos2) <- names
> names(cos3) <- names
> cmo <- rbind
> omo <- rbind

> ggplot(obo, aes) +
     geom_ribbon

每个区间都填充了不同的色彩,但咱们心愿将填充色彩的数量限度为两种。

> ggplot + geom_ribbon +
     geom_path + opts


最受欢迎的见解

1.R 语言动态图可视化:如何、创立具备精美动画的图

2.R 语言生存剖析可视化剖析

3.Python 数据可视化 -seaborn Iris 鸢尾花数据

4.r 语言对布丰投针(蒲丰投针)试验进行模仿和动静

5.R 语言生存剖析数据分析可视化案例

6.r 语言数据可视化剖析案例:摸索 brfss 数据数据分析

7.R 语言动静可视化:制作历史寰球平均温度的累积动静折线图动画 gif 视频图

8.R 语言高维数据的主成分 pca、t-SNE 算法降维与可视化剖析案例报告

9.python 主题 LDA 建模和 t -SNE 可视化

正文完
 0