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

1、R 绘图 饼图

R 语言提供来大量的库来实现绘图功能。

饼图,或称饼状图,是一个划分为几个扇形的圆形统计图表,用于描述量、频率或百分比之间的相对关系。

R 语言使用 pie() 函数来实现饼图,语法格式如下:

r 复制代码
pie(x, labels = names(x), edges = 200, radius = 0.8,
    clockwise = FALSE, init.angle = if(clockwise) 90 else 0,
    density = NULL, angle = 45, col = NULL, border = NULL,
    lty = NULL, main = NULL, ...)

x: 数值向量,表示每个扇形的面积。

labels: 字符型向量,表示各扇形面积标签。

edges: 这个参数用处不大,指的是多边形的边数(圆的轮廓类似很多边的多边形)。

radius: 饼图的半径。

main: 饼图的标题。

clockwise: 是一个逻辑值,用来指示饼图各个切片是否按顺时针做出分割。

angle: 设置底纹的斜率。

density: 底纹的密度。默认值为 NULL。

col: 是表示每个扇形的颜色,相当于调色板。

绘制饼状图要做这些准备:反映数量的向量、各部分的标签、各部分的颜色(可选)。

接下来我们绘制一个简单的饼图:

r 复制代码
# 数据准备
info = c(1, 2, 4, 8)
# 命名
names = c("Google", "Nhooo", "Taobao", "Weibo")
# 涂色(可选)
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 绘图
pie(info, labels=names, col=cols)

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

我们也可以使用 png()、jpeg()、bmp() 函数设置输出的文件格式为图片:

r 复制代码
# 数据准备
info = c(1, 2, 4, 8)
# 命名
names = c("Google", "Nhooo", "Taobao", "Weibo")
# 涂色(可选)
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 设置输出图片
png(file='nhooo-pie.png', height=300, width=300)
# 绘图
pie(info, labels=names, col=cols)

接下来我们给饼图设置标题,中文字体需要设置字体参数 family='GB1',也可以自己设置字体库,详细参考:R 绘图 - 中文支持。

r 复制代码
# 数据准备
info = c(1, 2, 4, 8)
# 命名
names = c("Google", "Nhooo", "Taobao", "Weibo")
# 涂色(可选)
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 计算百分比
piepercent = paste(round(100*info/sum(info)), "%")
# 绘图
pie(info, labels=piepercent, main = "网站分析", col=cols, family='GB1')
# 添加颜色样本标注
legend("topright", names, cex=0.8, fill=cols)

如果要绘制 3D 的饼图,可以使用 plotrix 库的 pie3D() 函数,使用前我们需要先安装:

r 复制代码
install.packages("plotrix", repos = "https://mirrors.ustc.edu.cn/CRAN/")
r 复制代码
# 载入 plotrix
library(plotrix)
# 数据准备
info = c(1, 2, 4, 8)

# 命名
names = c("Google", "Nhooo", "Taobao", "Weibo")

# 涂色(可选)
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")

# 设置文件名,输出为 png
png(file = "3d_pie_chart.png")

# 绘制 3D 图,family 要设置你系统支持的中文字体库
pie3D(info,labels = names,explode = 0.1, main = "3D 图",family = "STHeitiTC-Light")
相关推荐
Georgeviewer3 小时前
商业落地评测|实体门店GEO优化性价比与服务体系深度复盘
大数据·人工智能
Scott9999HH5 小时前
【IIoT流量实战】蒸汽管道阀门全关却仍有流量?用 Python 实现涡街信号 FFT 频谱分析与温压全补偿积算网关,深度拆解靠谱的涡街流量计厂家硬核技术标准
开发语言·python
腻害兔5 小时前
【若依项目-产品经理视角】深度拆解 RuoYi-Vue-Pro 商城模块:从商品管理到交易引擎,50 张表撑起一整套电商系统
java·大数据·vue.js·产品经理·ai编程
GIR1235 小时前
官方出品 | 多通道土壤呼吸测量系统市场现状与十五五规划深度报告:行业分析+趋势预测全收录
大数据·人工智能·机器学习
码智社6 小时前
AES加密原理详解及Java实现加解密实战
java·开发语言
AI云海6 小时前
python 列表、元组、集合和字典
开发语言·python
二十雨辰6 小时前
[爬虫]-Urllib
爬虫·python
南讯股份Nascent6 小时前
洽洽全域会员项目启动会圆满召开
大数据·人工智能
大郭鹏宇6 小时前
基于 LangGraph 构建智能分诊系统(一):项目概述与环境搭建
大数据·人工智能·microsoft·langchain
萧瑟余晖7 小时前
JDK 26 新特性详解
java·开发语言