【数据可视化应用】区域渐变填充折线图(R语言&Python实现)

举报
格图洛书 发表于 2022/07/22 00:12:37 2022/07/22
【摘要】 R-ggplot2 1. 简单的代码 这个代码是我随便从网上找到,然后修改的。 library(tidyverse) mydata <- data.frame(x = seq(-3, 3, 1e-2)) %>%    ...

R-ggplot2

1. 简单的代码

这个代码是我随便从网上找到,然后修改的。

library(tidyverse)

mydata <- data.frame(x = seq(-3, 3, 1e-2)) %>% 
  mutate(y1 = cos(x)) %>% 
  mutate(y2 = cos(x) + sin(x)) %>% 
  mutate(color_value = sin(x))
mydata

mydata %>% ggplot() + 
  geom_segment(aes(x=x, y = y1, xend=x,yend=y2, color=color_value)) +
  scale_colour_gradient2(low=scales::muted("blue", l=60), 
                         mid=scales::muted("green", l=60), 
                         high=scales::muted("red", l=60)) +
  theme_bw()

2. 定制代码

大哥说,他希望可以这样:颜色只有两

文章来源: wenyusuran.blog.csdn.net,作者:普通网友,版权归原作者所有,如需转载,请联系作者。

原文链接:wenyusuran.blog.csdn.net/article/details/122533537

【版权声明】本文为华为云社区用户转载文章,如果您发现本社区中有涉嫌抄袭的内容,欢迎发送邮件进行举报,并提供相关证据,一经查实,本社区将立刻删除涉嫌侵权内容,举报邮箱: cloudbbs@huaweicloud.com
  • 点赞
  • 收藏
  • 关注作者

评论(0

0/1000
抱歉,系统识别当前为高风险访问,暂不支持该操作

全部回复

上滑加载中

设置昵称

在此一键设置昵称,即可参与社区互动!

*长度不超过10个汉字或20个英文字符,设置后3个月内不可修改。

*长度不超过10个汉字或20个英文字符,设置后3个月内不可修改。