今天笔记的内容是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包")
END
© 素材来源于网络内容，侵权请联系后台删除
往期推荐
1
2
3
4
