如何用R語言繪制餅圖和條形圖
R 語言提供來大量的庫來實現(xiàn)繪圖功能。
餅圖，或稱餅狀圖，是一個劃分為幾個扇形的圓形統(tǒng)計圖表，用于描述量、頻率或百分比之間的相對關系。
R 語言使用 pie() 函數(shù)來實現(xiàn)餅圖，語法格式如下：
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: 數(shù)值向量，表示每個扇形的面積。
- labels: 字符型向量，表示各扇形面積標簽。
- edges: 這個參數(shù)用處不大，指的是多邊形的邊數(shù)（圓的輪廓類似很多邊的多邊形）。
- radius: 餅圖的半徑。
- main: 餅圖的標題。
- clockwise: 是一個邏輯值,用來指示餅圖各個切片是否按順時針做出分割。
- angle: 設置底紋的斜率。
- density: 底紋的密度。默認值為 NULL。
- col: 是表示每個扇形的顏色，相當于調(diào)色板。
繪制餅狀圖要做這些準備：反映數(shù)量的向量、各部分的標簽、各部分的顏色（可選）。
餅圖繪制
# 數(shù)據(jù)準備
info = c(1, 2, 4, 8)
# 命名
names = c("Google", "Runoob", "Taobao", "Weibo")
# 涂色（可選）
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 繪圖
pie(info, labels=names, col=cols)
執(zhí)行繪圖程序，會在當前目錄下生存一個 PDF 文件（Rplots.pdf）,打開文件可以看到圖形效果如下：
我們也可以使用 png()、jpeg()、bmp() 函數(shù)設置輸出的文件格式為圖片：
# 數(shù)據(jù)準備
info = c(1, 2, 4, 8)
# 命名
names = c("Google", "Runoob", "Taobao", "Weibo")
# 涂色（可選）
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 設置輸出圖片
png(file='runoob-pie.png', height=300, width=300)
# 繪圖
pie(info, labels=names, col=cols)
接下來我們給餅圖設置標題，中文字體需要設置字體參數(shù) family='GB1'，也可以自己設置字體庫，詳細參考：R 繪圖 - 中文支持。
# 數(shù)據(jù)準備
info = c(1, 2, 4, 8)
# 命名
names = c("Google", "Runoob", "Taobao", "Weibo")
# 涂色（可選）
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 計算百分比
piepercent = paste(round(100*info/sum(info)), "%")
# 繪圖
pie(info, labels=piepercent, main = "網(wǎng)站分析", col=cols, family='GB1')
# 添加顏色樣本標注
legend("topright", names, cex=0.8, fill=cols)
如果要繪制 3D 的餅圖，可以使用 plotrix 庫的 pie3D() 函數(shù)，使用前我們需要先安裝：
install.packages("plotrix", repos = https://mirrors.ustc.edu.cn/CRAN/)
# 載入 plotrix
library(plotrix)
# 數(shù)據(jù)準備
info = c(1, 2, 4, 8)
# 命名
names = c("Google", "Runoob", "Taobao", "Weibo")
# 涂色（可選）
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 設置文件名，輸出為 png
png(file = "3d_pie_chart.png")
# 繪制 3D 圖，family 要設置你系統(tǒng)支持的中文字體庫
pie3D(info,labels = names,explode = 0.1, main = "3D 圖",family = "STHeitiTC-Light")
生成圖片如下所示：
條形圖繪制
條形圖，也稱為柱狀圖條形圖，是一種以長方形的長度為變量的統(tǒng)計圖表。
條形圖可以是水平或垂直的，每個長方形可以有不同的顏色。
R 語言使用 barplot() 函數(shù)來創(chuàng)建條形圖，格式如下：
barplot(H,xlab,ylab,main, names.arg,col,beside)
參數(shù)說明：
- H 向量或矩陣，包含圖表用的數(shù)字值，每個數(shù)值表示矩形條的高度。
- xlab x 軸標簽。
- ylab y 軸標簽。
- main 圖表標題。
- names.arg 每個矩形條的名稱。
- col 每個矩形條的顏色。
接下來我們創(chuàng)建一個簡單的條形圖：
# 準備一個向量 cvd19 = c(83534,2640626,585493) # 顯示條形圖 barplot(cvd19)
執(zhí)行繪圖程序，會在當前目錄下生存一個 PDF 文件（Rplots.pdf）,打開文件可以看到圖形效果如下：
為了更好地表達信息，我們可以在圖表上添加標題、顏色及每個矩形條的名稱。
以下我們創(chuàng)建 2020 年 7 月 1 日中國、美國和印度的新冠疫情確診人數(shù)統(tǒng)計圖。
中文字體需要設置字體參數(shù) family='GB1'：
cvd19 = c(83534,2640626,585493)
barplot(cvd19,
main="新冠疫情條形圖",
col=c("#ED1C24","#22B14C","#FFC90E"),
names.arg=c("中國","美國","印度"),
family='GB1'
)
barplot 中的數(shù)據(jù)既可以是向量，也可以是矩陣，現(xiàn)在我們生成一張新冠疫情 6 月和 7 月對比圖。
首先準備數(shù)據(jù)：
| 中國 | 美國 | 印度 | |
|---|---|---|---|
| 6 月 | 83017 | 1794546 | 190535 |
| 7 月 | 83534 | 2640626 | 585493 |
轉(zhuǎn)換成矩陣，生成條形圖，按并排格式顯示，而且要顯示顏色樣本。
這里我們設置了自己的字體庫，詳細內(nèi)容可以參考R 繪圖 - 中文支持
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
c(83017, 83534, 1794546, 2640626, 190535, 585493),
2, 3
)
# 設置文件名，輸出為 png
png(file = "runoob-bar-1.png")
#加載字體
showtext_begin();
colnames(cvd19) = c("中國", "美國", "印度")
rownames(cvd19) = c("6月", "7月")
barplot(cvd19, main = "新冠疫情條形圖", beside=TRUE, legend=TRUE, family='SyHei')
# 去掉字體
showtext_end();
以下代碼會在當前程序目錄下生存一個 runoob-bar-1.png 文件，如下所示：
我們設置的顏色樣本將是每各組的顏色樣本：
library(plotrix)
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
c(83017, 83534, 1794546, 2640626, 190535, 585493),
2, 3
)
# 設置文件名，輸出為 png
png(file = "runoob-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();
以下代碼會在當前程序目錄下生存一個 runoob-bar-2.png 文件，如下所示：
beside 參數(shù)
beside 設置矩形條堆疊的方式，默認為 FALSE：
- beside=FALSE 時，條形圖的高度是矩陣的數(shù)值，矩形條是水平堆疊的。
- beside=TRUE 時，條形圖的高度是矩陣的數(shù)值，矩形條是并列的。
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
c(83017, 83534, 1794546, 2640626, 190535, 585493),
2, 3
)
# 設置文件名，輸出為 png
png(file = "runoob-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();
以下代碼會在當前程序目錄下生存一個 runoob-bar-3.png 文件，如下所示：
以上就是如何用R語言繪制餅圖和條形圖的詳細內(nèi)容，更多關于R語言繪制餅圖和條形圖的資料請關注腳本之家其它相關文章！
相關文章
R語言 install.packages 無法讀取索引的解決方案
這篇文章主要介紹了R語言 install.packages 無法讀取索引的解決方案，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
這篇文章主要為大家介紹了R語言繪制line?plot線圖的示例詳解，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進步，早日升職加薪2022-02-02
這篇文章主要介紹了使用R語言填補缺失值的方法,本文給大家介紹的非常詳細，對大家的學習或工作具有一定的參考借鑒價值，需要的朋友可以參考下2021-03-03
R語言如何將大型Excel文件轉(zhuǎn)為dta格式詳解
這篇文章主要給大家介紹了關于R語言如何將大型Excel文件轉(zhuǎn)為dta格式的相關資料，文中通過示例代碼介紹的非常詳細，對大家的學習或者工作具有一定的參考學習價值，需要的朋友們下面隨著小編來一起學習學習吧2021-03-03
這篇文章主要介紹了R語言 如何獲取指定位置的數(shù)據(jù)，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
pycharm實現(xiàn)R語言運行環(huán)境安裝配置的實現(xiàn)步驟
大多數(shù)人仍然使用RStudio進行R語言開發(fā)。與RStudio相比，PyCharm具有更多的優(yōu)勢，本文主要介紹了pycharm運行R語言腳本的實現(xiàn)步驟,文中通過圖文介紹的非常詳細,感興趣的可以了解一下2023-10-10
這篇文章主要介紹了r語言將數(shù)據(jù)標準化和中心化的實現(xiàn)，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
這篇文章主要為大家介紹了R語言科學計算RcppArmadillo的簡明手冊，內(nèi)容非常詳細全面，有需要的朋友可以借鑒參考下，希望能夠有所幫助2021-11-11
這篇文章主要介紹了R語言刪除/添加數(shù)據(jù)框中的某一行/列，文中通過示例代碼介紹的非常詳細，對大家的學習或者工作具有一定的參考學習價值，需要的朋友們下面隨著小編來一起學習學習吧2021-03-03
這篇文章主要介紹了R語言與格式，日期格式，格式轉(zhuǎn)化的操作，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04