R语言给图形填充颜色的操作(polygon函数)

 更新时间:2021年03月13日 15:58:56   作者:卧新实验室  
这篇文章主要介绍了R语言给图形填充颜色的操作(polygon函数),具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧

1. 使用polygon进行纯色填充

# polygon函数介绍
polygon(x, y = NULL, density = NULL, angle = 45,
    border = NULL, col = NA, lty = par("lty"),
    ..., fillOddEven = FALSE)
其中density为填充的阴影线的密度,angle为阴影线的斜率(角度)。值得注意的是,当你需要纯色填充时,density和angle可以忽略不写。然后border为边框的颜色。同时border也可以是逻辑。即FALSE相当于NULL,TRUE相当于为前景色。

# Distance Between Brownian Motions 布朗运动之间的距离
n <- 100
xx <- c(0:n, n:0)  #生成202个元素的向量,其中前面101与后面101数字对称
yy <- c(c(0, cumsum(stats::rnorm(n))), rev(c(0, cumsum(stats::rnorm(n)))))
plot  (xx, yy, type = "n", xlab = "Time", ylab = "Distance")
polygon(xx, yy, col = "gray", border = "red")
title("布朗运动之间的距离")

如图 两个布朗运动间的距离用灰色填充

2. 使用polygon进行阴影线填充

# Line-shaded polygons 线阴影多边形
plot(c(1, 9), 1:2, type = "n")
polygon(1:9, c(2,1,2,1,NA,2,1,2,1),
    density = c(10, 20), angle = c(-45, 45)) #density的值为两个,即不同的密度

补充:R语言世界地图转为SpatialPolygons以及去除地图内国家边界

##加载包

library(maps)
library(maptools)
library(ggplot2)
library(metR)

##提取地图并转换为Spatialpolygons

loc <- maps::map('world',interior = FALSE, 
         plot = FALSE, fill = TRUE,col = 'transparent')
ids <- sapply(strsplit(loc$names, ":"), function(x) x[1])
loc <- map2SpatialPolygons(map = loc, IDs = ids,proj4string = CRS('+proj=longlat +datum=WGS84 +no_defs'))

##去除内边界

worldmap1 <- unionSpatialPolygons(loc, IDs = rep(1,length(loc)))

##画图

worldmap2 <- fortify(worldmap1)
ggplot()+
  scale_x_longitude(expand = c(0, 0), breaks = seq(-180, 180, 45))+
  scale_y_latitude(expand = c(0, 0), breaks = seq(-90, 90, 30))+
  geom_polygon(data = worldmap2,
         mapping = aes(x = long, y = lat, group = group),
         colour = 'gray', fill = 'gray', size = 0.5)

##结果图

以上为个人经验,希望能给大家一个参考,也希望大家多多支持脚本之家。如有错误或未考虑完全的地方,望不吝赐教。

相关文章

  • 轻松学会R语言识别Excel日期

    轻松学会R语言识别Excel日期

    想知道如何用R语言识别Excel中的日期吗?别担心,我们有你需要的全部信息!本指南将向你展示如何使用R语言轻松识别Excel表格中的日期数据,让你在数据分析中游刃有余,快来掌握这一技巧,让数据处理更加高效!
    2023-12-12
  • R语言-修改(替换)因子变量的元素操作

    R语言-修改(替换)因子变量的元素操作

    这篇文章主要介绍了R语言-修改(替换)因子变量的元素操作,具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧
    2021-04-04
  • R语言学习Rcpp基础知识全面整理

    R语言学习Rcpp基础知识全面整理

    这篇文章主要介绍了R语言学习Rcpp知识的全面整理,包括相关配置说明,常用数据类型及建立等基础知识的全面详解,有需要的朋友可以借鉴参考下,希望能够有所帮助
    2021-11-11
  • R语言 数据集行列互换的技巧分享

    R语言 数据集行列互换的技巧分享

    这篇文章主要介绍了R语言 数据集行列互换的技巧分享,具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧
    2021-03-03
  • R语言关于“包”的知识点总结

    R语言关于“包”的知识点总结

    在本篇文章里小编给大家分享的是一篇关于R语言“包”的知识点总结内容,有兴趣的朋友们可以学习下。
    2021-03-03
  • R语言实现ggplot重绘天猫双十一销售额曲线图过程

    R语言实现ggplot重绘天猫双十一销售额曲线图过程

    这篇文章主要为大家介绍了如何使用ggplot绘制天猫双十一销售额曲线图的实现过程,有需要的朋友可以借鉴参考下,希望能够有所帮助,祝大家多多进步,早日升职加薪
    2021-11-11
  • R语言绘图基础教程(新手入门推荐!)

    R语言绘图基础教程(新手入门推荐!)

    数据作图是数据分析的重要方法之一,R提供了丰富的作图函,下面这篇文章主要给大家介绍了关于R语言绘图基础教程的相关资料,文中通过实例代码以及图文介绍的非常详细,需要的朋友可以参考下
    2022-11-11
  • R语言行筛选的方法之filter函数详解

    R语言行筛选的方法之filter函数详解

    最近工作中要处理一大批数据,所以这篇文章主要给大家介绍了关于R语言行筛选的方法之filter函数的相关资料,文中通过实例代码介绍的非常详细,需要的朋友可以参考下
    2022-07-07
  • R语言数组实例用法及知识点总结

    R语言数组实例用法及知识点总结

    在本文里,我们给大家整理的是关于R语言数组的相关知识点,有兴趣的朋友们可以跟着学习参考下。
    2021-04-04
  • R语言技巧Rcpp与Eigen库之间的相互转换

    R语言技巧Rcpp与Eigen库之间的相互转换

    这篇文章主要为大家介绍了R语言中Rcpp与Eigen库之间的相互转换的技巧操作,有需要的朋友可以借鉴参考下,希望能够有所帮助,祝大家多多进步
    2021-11-11

最新评论