怎么用R語言繪制餅圖和條形圖-創(chuàng)新互聯(lián)

這篇文章給大家分享的是有關(guān)怎么用R語言繪制餅圖和條形圖的內(nèi)容。小編覺得挺實(shí)用的，因此分享給大家做個(gè)參考，一起跟隨小編過來看看吧。

成都創(chuàng)新互聯(lián)公司專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù)，包含不限于做網(wǎng)站、成都網(wǎng)站設(shè)計(jì)、喀左網(wǎng)絡(luò)推廣、微信小程序、喀左網(wǎng)絡(luò)營銷、喀左企業(yè)策劃、喀左品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運(yùn)營等，從售前售中售后，我們都將竭誠為您服務(wù)，您的肯定，是我們大的嘉獎(jiǎng)；成都創(chuàng)新互聯(lián)公司為所有大學(xué)生創(chuàng)業(yè)者提供喀左建站搭建服務(wù)，24小時(shí)服務(wù)熱線：18982081108，官方網(wǎng)址：muchs.cn

R 語言提供來大量的庫來實(shí)現(xiàn)繪圖功能。

餅圖，或稱餅狀圖，是一個(gè)劃分為幾個(gè)扇形的圓形統(tǒng)計(jì)圖表，用于描述量、頻率或百分比之間的相對關(guān)系。

R 語言使用 pie() 函數(shù)來實(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ù)值向量，表示每個(gè)扇形的面積。

• labels: 字符型向量，表示各扇形面積標(biāo)簽。

• edges: 這個(gè)參數(shù)用處不大，指的是多邊形的邊數(shù)（圓的輪廓類似很多邊的多邊形）。

• radius: 餅圖的半徑。

• main: 餅圖的標(biāo)題。

• clockwise: 是一個(gè)邏輯值,用來指示餅圖各個(gè)切片是否按順時(shí)針做出分割。

• angle: 設(shè)置底紋的斜率。

• density: 底紋的密度。默認(rèn)值為 NULL。

• col: 是表示每個(gè)扇形的顏色，相當(dāng)于調(diào)色板。

  
  

繪制餅狀圖要做這些準(zhǔn)備：反映數(shù)量的向量、各部分的標(biāo)簽、各部分的顏色（可選）。

餅圖繪制

# 數(shù)據(jù)準(zhǔn)備
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í)行繪圖程序，會在當(dāng)前目錄下生存一個(gè) PDF 文件（Rplots.pdf）,打開文件可以看到圖形效果如下：

我們也可以使用 png()、jpeg()、bmp() 函數(shù)設(shè)置輸出的文件格式為圖片：

# 數(shù)據(jù)準(zhǔn)備
info = c(1, 2, 4, 8)

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

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

# 設(shè)置輸出圖片
png(file='runoob-pie.png', height=300, width=300)
# 繪圖
pie(info, labels=names, col=cols)

接下來我們給餅圖設(shè)置標(biāo)題，中文字體需要設(shè)置字體參數(shù) family='GB1'，也可以自己設(shè)置字體庫，詳細(xì)參考：R 繪圖 - 中文支持。

# 數(shù)據(jù)準(zhǔn)備
info = c(1, 2, 4, 8)

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

# 涂色（可選）
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
# 計(jì)算百分比
piepercent = paste(round(100*info/sum(info)), "%")
# 繪圖
pie(info, labels=piepercent, main = "網(wǎng)站分析", col=cols, family='GB1')
# 添加顏色樣本標(biāo)注
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ù)準(zhǔn)備
info = c(1, 2, 4, 8)

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

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

# 設(shè)置文件名，輸出為 png
png(file = "3d_pie_chart.png")

# 繪制 3D 圖，family 要設(shè)置你系統(tǒng)支持的中文字體庫
pie3D(info,labels = names,explode = 0.1, main = "3D 圖",family = "STHeitiTC-Light")

生成圖片如下所示：

條形圖繪制

條形圖，也稱為柱狀圖條形圖，是一種以長方形的長度為變量的統(tǒng)計(jì)圖表。

條形圖可以是水平或垂直的，每個(gè)長方形可以有不同的顏色。

R 語言使用 barplot() 函數(shù)來創(chuàng)建條形圖，格式如下：

barplot(H,xlab,ylab,main, names.arg,col,beside)

參數(shù)說明：

• H 向量或矩陣，包含圖表用的數(shù)字值，每個(gè)數(shù)值表示矩形條的高度。

• xlab x 軸標(biāo)簽。

• ylab y 軸標(biāo)簽。

• main 圖表標(biāo)題。

• names.arg 每個(gè)矩形條的名稱。

• col 每個(gè)矩形條的顏色。

  
  

接下來我們創(chuàng)建一個(gè)簡單的條形圖：

# 準(zhǔn)備一個(gè)向量
cvd19 = c(83534,2640626,585493)

# 顯示條形圖
barplot(cvd19)

執(zhí)行繪圖程序，會在當(dāng)前目錄下生存一個(gè) PDF 文件（Rplots.pdf）,打開文件可以看到圖形效果如下：

為了更好地表達(dá)信息，我們可以在圖表上添加標(biāo)題、顏色及每個(gè)矩形條的名稱。

以下我們創(chuàng)建 2020 年 7 月 1 日中國、美國和印度的新冠疫情確診人數(shù)統(tǒng)計(jì)圖。

中文字體需要設(shè)置字體參數(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 月對比圖。

首先準(zhǔn)備數(shù)據(jù)：

	中國	美國	印度
6 月	83017	1794546	190535
7 月	83534	2640626	585493

轉(zhuǎn)換成矩陣，生成條形圖，按并排格式顯示，而且要顯示顏色樣本。

這里我們設(shè)置了自己的字體庫，詳細(xì)內(nèi)容可以參考R 繪圖 - 中文支持

library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
  c(83017, 83534, 1794546, 2640626, 190535, 585493),
  2, 3
)

# 設(shè)置文件名，輸出為 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();

以下代碼會在當(dāng)前程序目錄下生存一個(gè) runoob-bar-1.png 文件，如下所示：

我們設(shè)置的顏色樣本將是每各組的顏色樣本：

library(plotrix)
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
  c(83017, 83534, 1794546, 2640626, 190535, 585493),
  2, 3
)

# 設(shè)置文件名，輸出為 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();

以下代碼會在當(dāng)前程序目錄下生存一個(gè) runoob-bar-2.png 文件，如下所示：

beside 參數(shù)

beside 設(shè)置矩形條堆疊的方式，默認(rèn)為 FALSE：

• beside=FALSE 時(shí)，條形圖的高度是矩陣的數(shù)值，矩形條是水平堆疊的。

• beside=TRUE 時(shí)，條形圖的高度是矩陣的數(shù)值，矩形條是并列的。

library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
  c(83017, 83534, 1794546, 2640626, 190535, 585493),
  2, 3
)

# 設(shè)置文件名，輸出為 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();

以下代碼會在當(dāng)前程序目錄下生存一個(gè) runoob-bar-3.png 文件，如下所示：

感謝各位的閱讀！關(guān)于“怎么用R語言繪制餅圖和條形圖”這篇文章就分享到這里了，希望以上內(nèi)容可以對大家有一定的幫助，讓大家可以學(xué)到更多知識，如果覺得文章不錯(cuò)，可以把它分享出去讓更多的人看到吧！

當(dāng)前文章：怎么用R語言繪制餅圖和條形圖-創(chuàng)新互聯(lián)
新聞來源：http://muchs.cn/article16/dejdgg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供品牌網(wǎng)站建設(shè)、企業(yè)建站、微信公眾號、網(wǎng)頁設(shè)計(jì)公司、自適應(yīng)網(wǎng)站、App開發(fā)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)