R 语言学习教程,从入门到精通,R 绘图饼图(23)

1、R 绘图 条形图

条形图,也称为柱状图条形图,是一种以长方形的长度为变量的统计图表。

条形图可以是水平或垂直的,每个长方形可以有不同的颜色。

R 语言使用 barplot() 函数来创建条形图,格式如下:

r 复制代码
barplot(H,xlab,ylab,main, names.arg,col,beside)

参数说明:

H 向量或矩阵,包含图表用的数字值,每个数值表示矩形条的高度。

xlab x 轴标签。

ylab y 轴标签。

main 图表标题。

names.arg 每个矩形条的名称。

col 每个矩形条的颜色。

接下来我们创建一个简单的条形图:

r 复制代码
# 准备一个向量
cvd19 = c(83534,2640626,585493)
# 显示条形图
barplot(cvd19)

执行绘图程序,会在当前目录下生存一个 PDF 文件(Rplots.pdf),打开文件可以看到图形效果如下:

为了更好地表达信息,我们可以在图表上添加标题、颜色及每个矩形条的名称。

以下我们创建 2020 年 7 月 1 日中国、美国和印度的新冠疫情确诊人数统计图。

中文字体需要设置字体参数 family='GB1':

r 复制代码
cvd19 = c(83534,2640626,585493)

barplot(cvd19,
    main="新冠疫情条形图",
    col=c("#ED1C24","#22B14C","#FFC90E"),
    names.arg=c("中国","美国","印度"),
    family='GB1'
)

barplot 中的数据既可以是向量,也可以是矩阵,现在我们生成一张新冠疫情 6 月和 7 月对比图。

首先准备数据:

转换成矩阵,生成条形图,按并排格式显示,而且要显示颜色样本。

这里我们设置了自己的字体库,详细内容可以参考 R 绘图 - 中文支持

r 复制代码
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
  c(83017, 83534, 1794546, 2640626, 190535, 585493),
  2, 3
)
# 设置文件名,输出为 png
png(file = "nhooo-bar-1.png")

#加载字体
showtext_begin();
colnames(cvd19) = c("中国", "美国", "印度")
rownames(cvd19) = c("6月", "7月")
barplot(cvd19, main = "新冠疫情条形图", beside=TRUE, legend=TRUE,  family='SyHei')
# 去掉字体
showtext_end();

以下代码会在当前程序目录下生存一个 nhooo-bar-1.png 文件,如下所示:

我们设置的颜色样本将是每各组的颜色样本:

r 复制代码
library(plotrix)
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
  c(83017, 83534, 1794546, 2640626, 190535, 585493),
  2, 3
)

# 设置文件名,输出为 png
png(file = "nhooo-bar-2.png")
#加载字体
showtext_begin();
colnames(cvd19) = c("中国", "美国", "印度")
rownames(cvd19) = c("6月", "7月")

barplot(cvd19, main = "新冠疫情条形图", beside=TRUE, legend=TRUE,col=c("blue","green"),  family='SyHei')
# 去掉字体
showtext_end();

以下代码会在当前程序目录下生存一个 nhooo-bar-2.png 文件,如下所示:

beside 参数

beside 设置矩形条堆叠的方式,默认为 FALSE:

beside=FALSE 时,条形图的高度是矩阵的数值,矩形条是水平堆叠的。

beside=TRUE 时,条形图的高度是矩阵的数值,矩形条是并列的。

r 复制代码
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
  c(83017, 83534, 1794546, 2640626, 190535, 585493),
  2, 3
)

# 设置文件名,输出为 png
png(file = "nhooo-bar-3.png")
#加载字体
showtext_begin();
colnames(cvd19) = c("中国", "美国", "印度")
rownames(cvd19) = c("6月", "7月")

barplot(cvd19, main = "新冠疫情条形图", beside=FALSE, legend=TRUE,col=c("blue","green"),  family='SyHei')
# 去掉字体
showtext_end();

以下代码会在当前程序目录下生存一个 nhooo-bar-3.png 文件,如下所示:

相关推荐
nenchoumi31193 分钟前
VLA 论文精读(十六)FP3: A 3D Foundation Policy for Robotic Manipulation
论文阅读·人工智能·笔记·学习·vln
island13149 分钟前
【git#4】分支管理 -- 知识补充
大数据·git·elasticsearch
凉、介9 分钟前
PCI 总线学习笔记(五)
android·linux·笔记·学习·pcie·pci
SuperSwaggySUP14 分钟前
4/25 研0学习日志
学习
LCHub低代码社区14 分钟前
钧瓷产业原始创新的许昌共识:技术破壁·产业再造·生态重构(一)
大数据·人工智能·维格云·ai智能体·ai自动化·大禹智库·钧瓷码
Cao12345678932130 分钟前
简易学生成绩管理系统(C语言)
c语言·开发语言
The Future is mine32 分钟前
C# new Bitmap(32043, 32043, PixelFormat.Format32bppArgb)报错:参数无效,如何将图像分块化处理?
开发语言·c#
亿坊电商34 分钟前
PHP框架在微服务迁移中能发挥什么作用?
开发语言·微服务·php
烁34734 分钟前
每日一题(小白)模拟娱乐篇33
java·开发语言·算法
码起来呗1 小时前
基于SpringBoot的高校学习讲座预约系统-项目分享
spring boot·后端·学习