1. 條形圖
- 語法
在R語言中創(chuàng)建條形圖的基本語法是 -
barplot(H, xlab, ylab, main, names.arg, col)
以下是所使用的參數(shù)的描述 -
-- H是包含在條形圖中使用的數(shù)值的向量或矩陣棍掐。
-- xlab是x軸的標(biāo)簽伴郁。
-- ylab是y軸的標(biāo)簽实苞。
-- main是條形圖的標(biāo)題澄阳。
-- names.arg是在每個條下出現(xiàn)的名稱的向量。
-- col用于向圖中的條形提供顏色。
- 創(chuàng)建普通條形圖
# 為圖表創(chuàng)建數(shù)據(jù)
H <- c(7, 12, 28, 3, 41)
# 設(shè)置文件名
png(file = "barchart.png")
# 繪制圖表
barplot(H)
# 保存圖片
dev.off()
效果：
- 條形圖標(biāo)簽玲躯，標(biāo)題和顏色
# 條形圖標(biāo)簽模聋，標(biāo)題和顏色
# 為圖表創(chuàng)建數(shù)據(jù)
H <- c(7, 12, 28, 3, 41)
M <- c("Mar", "Apr", "May", "Jun", "Jul")
# 設(shè)置文件名
png(file = "barchart_months_revenue.png")
# 繪制圖表
barplot(H, names.arg = M, xlab = "Month", ylab = "Revenue", col = "blue", main = "Revenue chart", border = "red")
# 保存文件
dev.off()
效果：
- 組合條形圖和堆積條形圖
# 組合條形圖和堆積條形圖
# 創(chuàng)建輸入向量
colors <- c("green", "orange", "brown")
months <- c("Mar", "Apr", "May", "Jun", "Jul")
regions <- c("East", "West", "North")
# 創(chuàng)建數(shù)據(jù)矩陣
values <- matrix(c(2, 9, 3, 11, 9, 4, 8, 7, 3, 12, 5, 2, 8, 10, 11), nrow = 3, ncol = 5, byrow = TRUE)
# 設(shè)置文件名
png(file = "barchart_stacked.png")
# 創(chuàng)建條形圖
barplot(values, main = "total revenue", names.arg = months, xlab = "month", ylab = "revenue", col = colors)
# 添加圖例
legend("topleft", regions, cex = 1.3, fill = colors)
# 保存文件
dev.off()
效果：
2. 箱線圖
語法
在R語言中創(chuàng)建箱線圖的基本語法是 -
boxplot(x, data, notch, varwidth, names, main)
以下是所使用的參數(shù)的描述 -
-- x是向量或公式。
-- 數(shù)據(jù)是數(shù)據(jù)幀般此。
-- notch是邏輯值蚪战。 設(shè)置為TRUE以繪制凹口。
-- varwidth是一個邏輯值铐懊。 設(shè)置為true以繪制與樣本大小成比例的框的寬度邀桑。
-- names是將打印在每個箱線圖下的組標(biāo)簽。
-- main用于給圖表標(biāo)題科乎。數(shù)據(jù)集
# 打印數(shù)據(jù)集
input <- mtcars[, c('mpg', 'cyl')]
print(input)
打印結(jié)果：
- 創(chuàng)建箱線圖
# 設(shè)置文件名
png(file = "boxplot.png")
# 繪制圖表
boxplot(mpg ~ cyl, data = mtcars, xlab = "Number of Cylinders", ylab = "Miles Per Gallon", main = "Mileage Data")
# 保存文件
dev.off()
效果：
- 帶槽的箱線圖
# 設(shè)置文件名
png(file = "boxplot_with_notch.png")
# 繪制圖表
boxplot(mpg ~ cyl, data = mtcars,
xlab = "Number of Cylinders",
ylab = "Miles Per Gallon",
main = "Mileage Data",
notch = TRUE,
varwidth = TRUE,
col = c("green", "yellow", "purple"),
names = c("Hign", "Medium", "Low")
)
# 保存文件
dev.off()
效果：
3. 直方圖
語法
使用R語言創(chuàng)建直方圖的基本語法是 -
hist(v,main,xlab,xlim,ylim,breaks,col,border)
以下是所使用的參數(shù)的描述 -
-- v是包含直方圖中使用的數(shù)值的向量壁畸。
-- main表示圖表的標(biāo)題。
-- col用于設(shè)置條的顏色喜喂。
-- border用于設(shè)置每個條的邊框顏色瓤摧。
-- xlab用于給出x軸的描述竿裂。
-- xlim用于指定x軸上的值的范圍。
-- ylim用于指定y軸上的值的范圍照弥。
-- breaks用于提及每個條的寬度腻异。創(chuàng)建直方圖
# 創(chuàng)建直方圖
# 創(chuàng)建向量
v <- c(9, 13, 21, 8, 36, 22, 12, 41, 31, 33, 19)
# 設(shè)置文件名
png(file = "histogram.png")
# 創(chuàng)建直方圖
hist(v, xlab = "Weight", col = "yellow", border = "blue")
# 保存文件
dev.off()
效果:
- X和Y值的范圍
# X和Y值的范圍
# 創(chuàng)建向量
v <- c(9, 13, 21, 8, 36, 22, 12, 41, 31, 33, 19)
# 設(shè)置文件名
png(file = "histogram_lim_breaks.png")
# 創(chuàng)建直方圖
hist(v, xlab = "Weight", col = "green", border = "red", xlim = c(0, 50), ylim = c(0, 5), breaks = 4)
# 保存文件
dev.off()
效果：
4. 折線圖
語法
在R語言中創(chuàng)建折線圖的基本語法是 -
plot(v,type,col,xlab,ylab)
以下是所使用的參數(shù)的描述 -
-- v是包含數(shù)值的向量。
-- 類型采用值“p”僅繪制點(diǎn)这揣，“l(fā)”僅繪制線和“o”繪制點(diǎn)和線悔常。
-- xlab是x軸的標(biāo)簽。
-- ylab是y軸的標(biāo)簽给赞。
-- main是圖表的標(biāo)題机打。
-- col用于給點(diǎn)和線的顏色。創(chuàng)建折線圖
# 創(chuàng)建折線圖
# 創(chuàng)建圖表數(shù)據(jù)
v <- c(7, 12, 28, 3, 41)
# 設(shè)置文件名
png(file = "line_chart.png")
# 繪制折線
plot(v, type = "o")
# 保存文件
dev.off()
效果：
- 折線圖標(biāo)題片迅，顏色和標(biāo)簽
# 創(chuàng)建圖表數(shù)據(jù)
v <- c(7, 12, 28, 3, 41)
# 設(shè)置文件名
png(file = "line_chart_label_colored.png")
# 繪制折線
plot(v, type = "o", col = "red", xlab = "Month", ylab = "Rain fall", main = "Rain fall chart")
# 保存文件
dev.off()
效果：
- 多線型折線圖
# 使用lines()函數(shù)残邀，可以在同一個圖表上繪制多條線
# 創(chuàng)建圖表數(shù)據(jù)
v <- c(7, 12, 28, 3, 41)
t <- c(14, 7, 6, 19, 3)
# 設(shè)置文件名
png(file = "line_chart_2_lines.png")
# 繪制表
plot(v, type = "o", col = "red", xlab = "Month", ylab = "Rain fall", main = "Rain fall chart")
lines(t, type = "o", col = "blue")
# 保存文件
dev.off()
效果：
5. 散點(diǎn)圖
- 語法
在R語言中創(chuàng)建散點(diǎn)圖的基本語法是 -
plot(x, y, main, xlab, ylab, xlim, ylim, axes)
以下是所使用的參數(shù)的描述 -
-- x是其值為水平坐標(biāo)的數(shù)據(jù)集。
-- y是其值是垂直坐標(biāo)的數(shù)據(jù)集柑蛇。
-- main要是圖形的圖塊芥挣。
-- xlab是水平軸上的標(biāo)簽。
-- ylab是垂直軸上的標(biāo)簽耻台。
-- xlim是用于繪圖的x的值的極限空免。
-- ylim是用于繪圖的y的值的極限。
-- axes指示是否應(yīng)在繪圖上繪制兩個軸盆耽。
- 數(shù)據(jù)集
# 數(shù)據(jù)集
input <- mtcars[, c('wt', 'mpg')]
print(input)
打印結(jié)果：
- 創(chuàng)建散點(diǎn)圖
# 數(shù)據(jù)
input <- mtcars[, c('wt', 'mpg')]
# 設(shè)置文件名
png(file = 'scatterplot.png')
# 創(chuàng)建表
plot(x = input$wt, y = input$mpg,
xlab = "Weight",
ylab = "Milage",
xlim = c(2.5, 5),
ylim = c(15, 30),
main = "Weight vs Milage"
)
# 保存文件
dev.off()
效果圖：
- 散點(diǎn)圖矩陣
在R中創(chuàng)建散點(diǎn)圖矩陣的基本語法是 -
pairs(formula, data)
以下是所使用的參數(shù)的描述 -
-- formula表示成對使用的一系列變量蹋砚。
-- data表示將從其獲取變量的數(shù)據(jù)集。
示例：
# 設(shè)置文件名
png(file = "scatterplot_matrices.png")
# 繪制
pairs(~ wt + mpg + disp + cyl, data = mtcars, main = "Scatterplot Matrix")
# 保存文件
dev.off()
效果：
6. 餅狀圖
- 語法
使用R語言創(chuàng)建餅圖的基本語法是 -
pie(x, labels, radius, main, col, clockwise)
以下是所使用的參數(shù)的描述 -
-- x是包含餅圖中使用的數(shù)值的向量摄杂。
-- labels用于給出切片的描述坝咐。
-- radius表示餅圖圓的半徑（值-1和+1之間）。
-- main表示圖表的標(biāo)題析恢。
-- col表示調(diào)色板畅厢。
-- clockwise是指示片段是順時針還是逆時針繪制的邏輯值。
- 創(chuàng)建餅狀圖
# 餅狀圖
x <- c(21, 62, 10, 53)
labels <- c("London", "New York", "Singapore", "Mumbai")
# 設(shè)置文件名
png(file = "city.png")
# 繪制餅圖
pie(x, labels)
# 保存文件
dev.off()
效果：
- 餅圖標(biāo)題和顏色
# 數(shù)據(jù)
x <- c(21, 62, 10, 53)
labels <- c("London", "New York", "Singapore", "Mumbai")
# 設(shè)置文件名
png(file = "city_title_colors.png")
# 繪制
pie(x, labels, main = "City pie chart", col = rainbow(length(x)))
# 保存文件
dev.off()
效果：
- 切片百分比和圖表圖例
# 數(shù)據(jù)
x <- c(21, 62, 10, 53)
labels <- c("London", "New York", "Singapore", "Mumbai")
# 計(jì)算百分比
piepercent <- round(100 * x / sum(x), 1)
# 設(shè)置文件名
png(file = "city_percentage_legends.png")
# 繪制圖表
pie(x, labels = piepercent, main = "City pie chart", col = rainbow(length(x)))
# 圖例
legend("topright", c("London", "New York", "Singapore", "Mumbai"), cex = 0.8, fill = rainbow(length(x)))
# 保存文件
dev.off()
效果：
- 3D餅圖
# 安裝包
install.packages("plotrix", repos="https://cran.cnr.berkeley.edu/")
# 引入庫
library(plotrix)
# 創(chuàng)建數(shù)據(jù)
x <- c(21, 62, 10, 53)
lbl <- c("London", "New York", "Singapore", "Mumbai")
# 設(shè)置文件名
png(file = "3d_pie_chart.png")
# 繪制圖表
pie3D(x, labels = lbl, explode = 0.1, main = "Pie chart Of Countries")
# 保存文件
dev.off()
效果：
