20-R 绘图 - 饼图

R 绘图 - 饼图

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

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

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

复制代码
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(8, 4, 2, 1)
# 命名
names <- c("Chinese", "English", "Sport", "Music")
# 涂色(可选)
cols <- c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 绘图
pie(info, labels=names, col=cols)

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

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

实例

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

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

接下来我们给饼图设置标题,中文字体需要设置字体参数 family='GB1',也可以自己设置字体库。

实例

R 复制代码
# 数据准备
info <- c(8, 4, 2, 1)
# 命名
names <- c("Chinese", "English", "Sport", "Music")
# 涂色(可选)
cols <- c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 设置输出图片
png(file='scores-pie.png', height=500, width=500)
# 计算百分比
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() 函数,使用前我们需要先安装:

复制代码
install.packages("plotrix", repos = "https://mirrors.ustc.edu.cn/CRAN/")

实例

R 复制代码
# 载入 plotrix
library(plotrix)
# 数据准备
info <- c(8, 4, 2, 1)
# 命名
names <- c("Chinese", "English", "Sport", "Music")
# 涂色(可选)
cols <- c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 设置输出图片
png(file='scores-pie.png', height=500, width=500)
# 计算百分比
piepercent <- paste(round(100*info/sum(info)), "%")
# 绘制 3D 图,family 要设置你系统支持的中文字体库
pie3D(info,labels = names,explode = 0.1, main = "3D 图",family = "GB1")
# 添加颜色样本标注
legend("topright", names, cex=0.8, fill=cols)

生成图片如下所示:

相关推荐
巷北夜未央3 分钟前
Python每日一题(14)
开发语言·python·算法
XiaoLeisj14 分钟前
【MyBatis】深入解析 MyBatis XML 开发:增删改查操作和方法命名规范、@Param 重命名参数、XML 返回自增主键方法
xml·java·数据库·spring boot·sql·intellij-idea·mybatis
雾月5531 分钟前
LeetCode 914 卡牌分组
java·开发语言·算法·leetcode·职场和发展
Y.O.U..42 分钟前
今日八股——C++
开发语言·c++·面试
dleei1 小时前
MySql安装及SQL语句
数据库·后端·mysql
weixin_307779131 小时前
使用C#实现从Hive的CREATE TABLE语句中提取分区字段名和数据类型
开发语言·数据仓库·hive·c#
Xiaok10181 小时前
解决 Hugging Face SentenceTransformer 下载失败的完整指南:ProxyError、SSLError与手动下载方案
开发语言·神经网络·php
绿草在线1 小时前
Mock.js虚拟接口
开发语言·javascript·ecmascript
go_bai1 小时前
Linux环境基础开发工具——(2)vim
linux·开发语言·经验分享·笔记·vim·学习方法
小郝 小郝1 小时前
【C语言】strstr查找字符串函数
c语言·开发语言