這篇文章給大家分享的是有關(guān)R語(yǔ)言作圖之直方圖histogram繪制過(guò)程詳解的內(nèi)容。小編覺(jué)得挺實(shí)用的,因此分享給大家做個(gè)參考,一起跟隨小編過(guò)來(lái)看看吧。
為天柱等地區(qū)用戶提供了全套網(wǎng)頁(yè)設(shè)計(jì)制作服務(wù),及天柱網(wǎng)站建設(shè)行業(yè)解決方案。主營(yíng)業(yè)務(wù)為網(wǎng)站建設(shè)、成都網(wǎng)站設(shè)計(jì)、天柱網(wǎng)站設(shè)計(jì),以傳統(tǒng)方式定制建設(shè)網(wǎng)站,并提供域名空間備案等一條龍服務(wù),秉承以專業(yè)、用心的態(tài)度為用戶提供真誠(chéng)的服務(wù)。我們深信只要達(dá)到每一位用戶的要求,就會(huì)得到認(rèn)可,從而選擇與我們長(zhǎng)期合作。這樣,我們也可以走得更遠(yuǎn)!直方圖和條形圖較大的不同則是直方圖可以用于顯示出一個(gè)數(shù)據(jù)的頻數(shù),具有統(tǒng)計(jì)的作用,我們下面來(lái)看一一看直方圖在R語(yǔ)言當(dāng)中是如何繪制的吧!
首先創(chuàng)建一系列的數(shù)據(jù):
h<-c(4,6,3,46,3,5,7,8,3,4,3,4,5)
創(chuàng)建完之后將這個(gè)數(shù)據(jù)納入到直方圖histogram的繪制函數(shù)hist()當(dāng)中,如下所示:
hist(h,xlab = "number'scale",ylab="Right",col="blue",border = "red")
其中的參數(shù)h表示我們納入進(jìn)來(lái)的數(shù)據(jù),這些數(shù)據(jù)將會(huì)在x軸上進(jìn)行標(biāo)定,xlab表示的是x軸的標(biāo)簽,ylab表示的是y軸的標(biāo)簽,col表示的是直方圖的顏色,border表示的是直方圖邊緣的顏色,繪制的結(jié)果如下所示:
如果想要對(duì)繪制的數(shù)據(jù)加以限制,比如說(shuō)x軸上只繪制從0到20的數(shù)據(jù),y也只繪制0到10的數(shù)據(jù)的話,則可以直接使用xlim和ylim來(lái)進(jìn)行指定,指定的參數(shù)應(yīng)當(dāng)為向量(這個(gè)是R語(yǔ)言當(dāng)中的規(guī)定)。
重新編寫(xiě)的代碼如下所示:
> hist(h,xlab = "number'scale",ylab="Right",col="blue",border = "red",xlim=c(0,20),ylim=c(0,10))
出來(lái)的圖像如下所示:
這就是繪制直方圖當(dāng)中所有的內(nèi)容了,它也是R語(yǔ)言當(dāng)中繪圖最簡(jiǎn)單的一個(gè)。
知識(shí)點(diǎn)擴(kuò)展:R語(yǔ)言作圖——histogram(直方圖)
最近小仙同學(xué)很是煩惱,本以為自己已經(jīng)掌握了ggplot2作圖的語(yǔ)法,用read.csv(),ggplot()+geom_point()/boxplot()/violinplot()…就可以畫(huà)遍天下圖表,結(jié)果卻發(fā)現(xiàn)到真正畫(huà)圖的時(shí)候,還是會(huì)出現(xiàn)不少的小問(wèn)題。
比如小仙最近要畫(huà)一個(gè)直方圖,最開(kāi)始用hist()函數(shù)試了一下,看了下形狀, 好像因?yàn)?strong>數(shù)據(jù)取值范圍跨度太大(較大值104,724,最小值30),這個(gè)圖畫(huà)出來(lái)有點(diǎn)丑,于是決定用ggplot美化一下。
調(diào)整之后好看是好看了,但是大家有沒(méi)有看出什么不對(duì)的地方,明明bins=10但是只畫(huà)出8個(gè)格子,之后調(diào)整bins的值,每次都會(huì)比我指定的值少2個(gè)格子。而且,圖中第一個(gè)格子(取值范圍0-1250)應(yīng)該有700多個(gè)數(shù)據(jù),但是圖上顯示只有不到300個(gè),問(wèn)題出在哪里呢?小仙同學(xué)百思不得其解。在geom_histogram()函數(shù)中,bins就是用來(lái)指定分組數(shù)目(格子),為什么總是會(huì)少兩個(gè)?
小仙同學(xué)考慮到自己能力有限,決定量力而行,另辟蹊徑。
于是設(shè)置另外一個(gè)參數(shù)breaks,終于找回了丟失的格子
經(jīng)過(guò)此事,小仙同學(xué)深刻認(rèn)識(shí)到了自己的有限水平,哈哈。不過(guò)還是分享一下,希望能幫助到大家。實(shí)際的數(shù)據(jù)可真是比書(shū)上的例子難處理呢。
按照慣例寫(xiě)一下整個(gè)作圖的過(guò)程。
首先要把你想要繪圖的數(shù)據(jù)調(diào)整成R語(yǔ)言可以識(shí)別的格式,建議大家在excel中保存成csv格式。
data<-read.csv(“your file path”, header = T)
#注釋:header=T表示數(shù)據(jù)中的第一行是列名,如果沒(méi)有列名就用header=F
library(ggplot2)
#注釋:package使用之前需要調(diào)用
p<-ggplot(data, aes(x=data$銷量)) +
geom_histogram(breaks=seq(0,10000,1000))+ xlim(0,10000)
p
感謝各位的閱讀!關(guān)于“R語(yǔ)言作圖之直方圖histogram繪制過(guò)程詳解”這篇文章就分享到這里了,希望以上內(nèi)容可以對(duì)大家有一定的幫助,讓大家可以學(xué)到更多知識(shí),如果覺(jué)得文章不錯(cuò),可以把它分享出去讓更多的人看到吧!
標(biāo)題名稱:R語(yǔ)言作圖之直方圖histogram繪制過(guò)程詳解-創(chuàng)新互聯(lián)
路徑分享:http://www.rwnh.cn/article38/pippp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站設(shè)計(jì)公司、外貿(mào)建站、標(biāo)簽優(yōu)化、Google、微信小程序、營(yíng)銷型網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)
猜你還喜歡下面的內(nèi)容