創(chuàng)新互聯(lián)建站是一家專注于網(wǎng)站制作、做網(wǎng)站與策劃設(shè)計(jì),廣饒網(wǎng)站建設(shè)哪家好?創(chuàng)新互聯(lián)建站做網(wǎng)站,專注于網(wǎng)站建設(shè)10余年,網(wǎng)設(shè)計(jì)領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:廣饒等地區(qū)。廣饒做網(wǎng)站價(jià)格咨詢:028-86922220

首先載入顏色擴(kuò)展包RColorBrewer，具體使用方法可參見下面兩篇文章http://book.2cto.com/201408/45552.html，http://tianxingzhe.blog.51cto.com/3390077/1641199

 

library(RColorBrewer)

本文以hadoop集群wordcount程序的輸出結(jié)果為數(shù)據(jù)源

數(shù)據(jù)的整理代碼如下

x=read.delim("C:/Users/a/Desktop/sample.txt",header=FALSE) #讀入文本數(shù)據(jù)

names(x)=c("word","count") #加表頭

x=transform(x, pct=round(x$count/sum(x$count)*100)) #數(shù)據(jù)框增加百分比列 
              
y=x[order(x[,2],decreasing=T),]#排序

z=x[sample(nrow(x),20,replace=F),]#隨機(jī)抽樣

或者z=head(y,n=11); tail(y,n=11)#抽取前后11行，本例采用了隨機(jī)抽樣

繪制橫向直方圖，詳細(xì)命令參數(shù)解釋可參見以下博客http://blog.csdn.net/rav009/article/details/40149405

代碼如下：

barplot(rev(z$pct),horiz=T,xlim=c(-4,5),axes=F,col=brewer.pal(11, "BrBG")[1:11])  
text(seq(from=0.7,length.out=20,by=1.2),x=-0.5,label=rev(z$word))  
axis(3,c(0,1,2,3,4,5),c('0%','10%','20%','30%','40%','50%'))

這篇文章大家可以參考參考

http://book.2cto.com/201408/45574.html

 

網(wǎng)站題目：R語言繪制橫向柱裝圖
文章起源：http://jinyejixie.com/article14/jdojge.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供定制網(wǎng)站、企業(yè)網(wǎng)站制作、自適應(yīng)網(wǎng)站、服務(wù)器托管、網(wǎng)站維護(hù)、微信公眾號

廣告

聲明：本網(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)