标签：语言 填充 tecdat XY 可视化 ribbon 折线图 geom ggplot2

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

原文出处：拓端数据部落公众号

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

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

首先，加载 ggplot2 并生成要在示例中使用的数据框（我使用的是稍微修改过的数据集，因此最终结果会与原始图有所不同）。

在 ggplot2 中可以填充两条线之间的区域，但是由于我们需要线段具有不同的颜色，因此需要一些额外的工作。

1.   > ggplot +
2.   geom_ribbon

为了改变两条线交叉点的填充颜色，需要计算交点。

1.   slope1 <- c
2.   intcpt1 <- with
3.   intcpt2 <- with
4.   x2 <- with
5.   y3 <- with

现在，我们确保计算正确，我们目视检查交叉点的位置：

1.   > ggplot+ geom_line +
2.   geom_line +
3.   geom_point

当我计划为上面使用 geom_ribbon 生成的图着色时，交叉点也需要以 geom_ribbon 的形式呈现——一个y3 复制变量就可以做到这一点。

y4 <- y3

显然还需要额外的错误检查，如上图最左边和最右边的绿点的位置所示——任何两条线都可以有一个交点，超出特定图的范围。

1.   > cross[which] <- NA
2.   >segment <- findIntval

为了使 ggplot2 能够在每个线条交叉处改变填充颜色，它需要知道每个彩色区域的起点和终点。因此需要复制中间的交叉点，因为它们将是两个相邻区域的一部分，填充了不同的颜色。

1.   x3 <- c(tail, NA)
2.   y5 <- c(tail, NA)
3.   y6 <- y5

现在需要将两条线的坐标和彩色区域的起点/终点组合成一个长格式的数据帧。

1.   > crs1 <- css
2.   > cs2 <- cr[!is.na]
3.   > co3 <- rss[!is.na]

1.   > names(cos2) <- names
2.   > names(cos3) <- names
3.   > cmo <- rbind
4.   > omo <- rbind
5.    
6.   > ggplot(obo, aes) +
7.   geom_ribbon

每个区间都填充了不同的颜色，但我们希望将填充颜色的数量限制为两种。

1.   > ggplot + geom_ribbon +
2.   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可视化

标签：语言,填充,tecdat,XY,可视化,ribbon,折线图,geom,ggplot2
来源： https://www.cnblogs.com/tecdat/p/15861424.html

本站声明： 1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；
2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；
3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；
4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；
5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。