作者：丁點(diǎn)helper

來(lái)源：丁點(diǎn)幫你

上篇文章中，我們用世界銀行的例子給大家介紹了R語(yǔ)言散點(diǎn)圖怎么畫(huà)，那折線圖呢？

繪制折線圖

如果將散點(diǎn)圖上的點(diǎn)從左往右連接起來(lái)，就會(huì)得到一個(gè)折線圖。今天我們以R中自帶的Orange 數(shù)據(jù)集為例，來(lái)學(xué)習(xí)折線圖的畫(huà)法，該數(shù)據(jù)集中包含五種橘樹(shù)的樹(shù)齡和年輪數(shù)據(jù)。要考察橘樹(shù)的年輪如何隨著樹(shù)齡變化，先畫(huà)個(gè)散點(diǎn)圖看看：

#?先看第一種橘樹(shù)，提取第一種樹(shù)的數(shù)據(jù)，保存在t1中
t1?<-?subset(Orange,?Tree==1)

戳此復(fù)習(xí)subset()函數(shù)的功能。

# 繪制散點(diǎn)圖
plot(t1$age, t1$circumference, 
        xlab="Age (days)",
        ylab="Circumference (mm)",
        main="Orange Tree 1 Growth")

再畫(huà)折線圖：

# 繪制折線圖
plot(t1$age, t1$circumference, 
     xlab="Age (days)", 
     ylab="Circumference (mm)",
     main="Orange Tree 1 Growth",
     type="b")

可以發(fā)現(xiàn)，繪制折線圖使用的仍是plot()函數(shù)，其代碼只比散點(diǎn)圖的多了一個(gè)用來(lái)設(shè)置圖形外觀的命令：type='b'，'b'表示用線條將點(diǎn)連接起來(lái)，因此我們就得到了下圖：

折線圖的圖形外觀還可以有很多種，均可通過(guò)type命令來(lái)完成，下表展示了type可選的取值：

選取上表中各種類型的type值，就可以得到各式各樣的折線圖：

試著調(diào)整圖形

雖然上面的圖形已經(jīng)可以準(zhǔn)確表達(dá)數(shù)據(jù)信息，但有時(shí)自動(dòng)生成的圖形可能無(wú)法滿足需求。

比如，我們想把上面的散點(diǎn)圖和折線圖放在同一張圖中，便于比較，或者想改變文字的字體、顏色等…… 此時(shí)，可以在用plot()作圖前，先用par()函數(shù)設(shè)置你想改變的參數(shù)：

#?設(shè)置par()函數(shù)
par(mfrow=c(1,2),bty='l',cex.main=1.5, 
    col.main='deepskyblue4',font.lab=2, 
    family='Times New Roman')
# 繪制散點(diǎn)圖
plot(t1$age,?t1$circumference,
     xlab="Age (days)",
     ylab="Circumference (mm)", 
     main="Orange Tree 1 Growth")
# 繪制折線圖
plot(t1$age, t1$circumference,
     xlab="Age (days)", 
     ylab="Circumference (mm)", 
     main="Orange Tree 1 Growth",col='deepskyblue4',
     type="b")

大家可以先將這段代碼復(fù)制到R中運(yùn)行（記得先用本文開(kāi)頭的方法生成t1這個(gè)對(duì)象），看看出現(xiàn)了什么？

par(mfrow=c(1,2),bty='l',cex.main=1.5,
    col.main='deepskyblue4',font.lab=2,
    family='Times New Roman')

par()是R中用來(lái)設(shè)置圖形參數(shù)的函數(shù)。

上面的代碼中，mfrow是圖形整體布局命令，不是針對(duì)某個(gè)具體的圖形而言的，而是對(duì)整個(gè)繪圖區(qū)域的布局。定義整體有幾行、幾列圖形，其賦值形式為c(行數(shù)，列數(shù))；

bty是設(shè)置圖形邊框類型的函數(shù)，其取值及效果如下圖：

cex.main：設(shè)置標(biāo)題文本的放大倍數(shù)，還可用cex.axis 和 cex.lab分別設(shè)置坐標(biāo)軸刻度值和名稱文本的放大倍數(shù)；

col.main：設(shè)置文本標(biāo)題的顏色，大家能猜出坐標(biāo)軸刻度值和名稱的顏色如何設(shè)置嗎？歡迎留言呀~

font.lab：設(shè)置坐標(biāo)軸名稱的字型：

family：設(shè)置圖形中所有文本的字體。

最終得到的圖形如下，你還能想到哪些需要改進(jìn)或調(diào)整的地方呢，我們可以作為今后講授的內(nèi)容

——熱門課程推薦：

想從事業(yè)務(wù)型數(shù)據(jù)分析師，您可以點(diǎn)擊>>>“數(shù)據(jù)分析師”了解課程詳情；

想從事大數(shù)據(jù)分析師，您可以點(diǎn)擊>>>“大數(shù)據(jù)就業(yè)”了解課程詳情；

想成為人工智能工程師，您可以點(diǎn)擊>>>“人工智能就業(yè)”了解課程詳情；

想了解Python數(shù)據(jù)分析，您可以點(diǎn)擊>>>“Python數(shù)據(jù)分析師”了解課程詳情；

想咨詢互聯(lián)網(wǎng)運(yùn)營(yíng)，你可以點(diǎn)擊>>>“互聯(lián)網(wǎng)運(yùn)營(yíng)就業(yè)班”了解課程詳情；

想了解更多優(yōu)質(zhì)課程，請(qǐng)點(diǎn)擊>>>