文章详情

短信预约-IT技能 免费直播动态提醒

请输入下面的图形验证码

提交验证

短信预约提醒成功

R语言数据可视化包ggplot2散点图怎么画

2023-07-04 13:26

关注

这篇文章主要介绍“R语言数据可视化包ggplot2散点图怎么画”的相关知识,小编通过实际案例向大家展示操作过程,操作方法简单快捷,实用性强,希望这篇“R语言数据可视化包ggplot2散点图怎么画”文章能帮助大家解决问题。

前言

在ggplot2里,所有图片由6个基本要素组成:

数据(Data)

层次(Layers),包含两种元素:几何元素(Geometrics)与统计转换(Statistical transformations)。

几何元素指的是你想画的图形,如点,线,或多边形等。

统计转换指的是你想画的统计描述,如均数,标准差或可信区间等。

刻度(Scales), 通常指几何元素(如点或者线)的大小,颜色和形状等。

坐标系统(A coordinate system), 通常指的是x轴与y轴。

多面化(Faceting),简单的说,就是可以将一个图片分成多个小的亚图片。

主题 (Theme),此要素可以控制非数据与非统计部分的内容,如背景颜色,字体大小等。

下面以一个简单的例子引入:

library(ggplot2)#导入ggplot包#使用mtcars数据做一个散点图ggplot(data = mtcars,            # 要素1:数据       aes(x = wt, y = mpg,        colour = factor(cyl))) +  # 要素3:刻度       geom_point() +            # 要素2:几何元素(点)       coord_cartesian() +       # 要素4:坐标轴       facet_wrap(~ cyl) +       # 要素5:分面化       theme_bw()                # 要素6:主题

R语言数据可视化包ggplot2散点图怎么画

 其中mtcars数据概况如下:

R语言数据可视化包ggplot2散点图怎么画

首先介绍第一类常用的图像类型:散点图 

#载入ggplot2library(ggplot2)#建立数据集,横坐标为1:100,纵坐标为服从标准正态分布的随机数x <- seq(1,100,length=100) y <- rnorm(100,mean=0,sd=1)data <- data.frame(x=x,y=y)#作散点图ggplot(data, aes(x=x, y=y)) +   geom_point()

R语言数据可视化包ggplot2散点图怎么画

给原始数据加上分类标签:

x <- seq(1,100,length=100) y <- rnorm(100,mean=0,sd=1)z <- c(rep("A",30),rep("B",30),rep("C",40))z <- sample(z,100)data <- data.frame(x=x,y=y,z=z)

数据概况如下: 

R语言数据可视化包ggplot2散点图怎么画

按z列分类以不同的颜色在图中画出散点图:

ggplot(data, aes(x=x, y=y,color=z)) +   geom_point()

R语言数据可视化包ggplot2散点图怎么画

按z列分类以不同的形状在图中画出散点图:

ggplot(data, aes(x=x, y=y,shape=z)) +   geom_point()

R语言数据可视化包ggplot2散点图怎么画

多面化(将ABC三类分开展示):

ggplot(data, aes(x=x, y=y,color=z)) +   geom_point()+  facet_wrap(~z)+  theme(legend.position = "none")

R语言数据可视化包ggplot2散点图怎么画

 若不加

theme(legend.position = "none")

这一段代码,显示的图表如下:

R语言数据可视化包ggplot2散点图怎么画

可以看出不加这一段代码侧边栏显示图例,但显然这个图例是多余的,因此我们一般去掉 

 自定义颜色:

ggplot(data, aes(x=x, y=y,color=z)) +   geom_point()+  facet_wrap(~z)+  theme(legend.position = "none")+  scale_colour_manual(values = c("purple", "red", "black"))

R语言数据可视化包ggplot2散点图怎么画

 添加拟合曲线:

x <- seq(1,50,length=50) y <- rnorm(50,mean=0,sd=5)z <- c(rep("A",20),rep("B",15),rep("C",15))z <- sample(z,50)data <- data.frame(x=x,y=2*x-y,z=z)#这里构造的数据集大致服从y=2xggplot(data, aes(x=x, y=y)) +   geom_point()+  geom_smooth()#添加拟合曲线,默认的形式是局部回归,所以拟合出的线条是曲线。

R语言数据可视化包ggplot2散点图怎么画

因为geom_smooth()默认的形式是局部回归,所以拟合出的线条是曲线,阴影区域为置信区间。

这里也可以用其他模型拟合,如线型模型:

ggplot(data, aes(x=x, y=y)) +   geom_point()+  geom_smooth(method = "lm", se = FALSE)

R语言数据可视化包ggplot2散点图怎么画

(se = FALSE:去除置信区间)

更换主题 :

ggplot(data, aes(x=x, y=y)) +   geom_point()+  theme_test()

R语言数据可视化包ggplot2散点图怎么画

关于“R语言数据可视化包ggplot2散点图怎么画”的内容就介绍到这里了,感谢大家的阅读。如果想了解更多行业相关的知识,可以关注编程网行业资讯频道,小编每天都会为大家更新不同的知识点。

阅读原文内容投诉

免责声明:

① 本站未注明“稿件来源”的信息均来自网络整理。其文字、图片和音视频稿件的所属权归原作者所有。本站收集整理出于非商业性的教育和科研之目的,并不意味着本站赞同其观点或证实其内容的真实性。仅作为临时的测试数据,供内部测试之用。本站并未授权任何人以任何方式主动获取本站任何信息。

② 本站未注明“稿件来源”的临时测试数据将在测试完成后最终做删除处理。有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341

软考中级精品资料免费领

  • 历年真题答案解析
  • 备考技巧名师总结
  • 高频考点精准押题
  • 2024年上半年信息系统项目管理师第二批次真题及答案解析(完整版)

    难度     813人已做
    查看
  • 【考后总结】2024年5月26日信息系统项目管理师第2批次考情分析

    难度     354人已做
    查看
  • 【考后总结】2024年5月25日信息系统项目管理师第1批次考情分析

    难度     318人已做
    查看
  • 2024年上半年软考高项第一、二批次真题考点汇总(完整版)

    难度     435人已做
    查看
  • 2024年上半年系统架构设计师考试综合知识真题

    难度     224人已做
    查看

相关文章

发现更多好内容

猜你喜欢

AI推送时光机
位置:首页-资讯-后端开发
咦!没有更多了?去看看其它编程学习网 内容吧
首页课程
资料下载
问答资讯