今天笔记的内容是R语言中绘图相关的基础知识,绘制简单的饼图、条形图。公众号:生信分析笔记
饼图怎么画?
R语言中pie()
函数用于绘制饼状图,需要准备向量数据、标签、调色板等信息,然后利用函数生成图片,语法格式为:
pie(
x, #数值向量,饼状图中每块面积大小
labels = names(x), #字符向量,各扇区的名称
edges = 200, #外边圆圈的边数,越大越平滑
radius = 0.8, #饼图半径
clockwise = FALSE, #逻辑值,是否对各块按顺时针进行分隔
density = NULL, #底纹密度
angle = 45, #底纹斜率
col = NULL, #每个区域的颜色
main = NULL, #标题
…)
接下来进行示例演示,我们做一个简单的饼图。
#安装与加载R包
install.packages("plotrix", repos = "https://mirrors.ustc.edu.cn/CRAN/")
library(plotrix) #plotrix用于绘制3d饼图
#输入变量
x = c(1, 2, 4, 8)
#输入标签名称
ns = c("a", "b", "c", "d")
#输入调色信息
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
#绘制3D饼图
pie3D(x,labels = ns,explode = 0.1, main = "first pie plot")
#绘制平面饼图
pie(x,labels = ns,col=cols)
然后可以在右下角plot窗口看到如下饼图:
可以使用 png()
、jpeg()
、bmp()
函数设置输出的文件格式为图片,如下:
#设置文件名称和参数
png(filename = "first-pie.png",height = 400,width = 400)
#绘制图形
pie(x,labels = ns,col=cols)
#关闭打印器(相当于把图片保存,只有这样才能打开这个图片,不然是0B,因为系统默认处于一直编辑状态)
dev.off()
条形图怎么画?
R语言中用 barplot()
函数来创建条形图,格式如下:
barplot(
height, #条形图的高度
width, #条的宽度
sapace #条之间的间隙值
horize #是否水平放置
xlab, #x轴标签
ylab, #y轴标签
main, #标题
names.arg, #每个矩形条的名称
col, #颜色
)
接下来进行示例展示,绘制两个条形图,前者是常见的一维向量条形图,后者是二维向量制作的堆叠条形图。
a <- c(1,2,3,4,3,2,1)
names(a) <- c('a','b','c','d','e','f','g')
png(filename = "secendplot.png")
#绘制条形图
barplot(a,main = "two barplot",legend=FALSE)
dev.off()
#工作目录下会有一个图片文件生成,打开可以查看结果。
接来下用矩阵来试试,3×3的矩阵绘制出来有两部分堆叠在一起。
b <- matrix(c(1,2,3,4,2,3,1,4,1),nrow = 3,byrow = T)
colnames(b) <- c('c1','c2','c3')
rownames(b) <- c('r1','r2','r3')
barplot(b,main = "3 barplot",legend=FALSE)
#完成后在屏幕右下角plot窗口查看图片,也可以进行保存。
beside 参数
- beside=FALSE 时,条形图的高度是矩阵的数值,矩形条是水平堆叠的。
- beside=TRUE 时,条形图的高度是矩阵的数值,矩形条是并列的。
比如,用刚刚矩阵的数据绘制时,添加一个参数beside=TRUE
,得到下列结果。
barplot(b,main = "4 barplot",legend=FALSE,beside = TRUE)
补充内容:有时候安装R包出现报错,安装失败。可以试试通过下面这种方式来安装,只需要复制代码,然后把想安装的包名称写进去就可以。
if (!require("BiocManager", quietly = TRUE))
install.packages("BiocManager")
BiocManager::install("这里填写需要安装的R包")
参考资料:https://www.runoob.com/r
本文由mdnice多平台发布
**粗体** _斜体_ [链接](http://example.com) `代码` - 列表 > 引用
。你还可以使用@
来通知其他用户。