欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

R語言數(shù)據(jù)可視化繪圖bar chart條形圖實(shí)現(xiàn)示例

 更新時(shí)間:2022年02月18日 11:32:41   作者:黃小仙  
這篇文章主要為大家介紹了R語言數(shù)據(jù)可視化繪圖bar chart條形圖的實(shí)現(xiàn)示例,有需要的朋友可以借鑒參考下,希望能夠有所幫助,祝大家多多進(jìn)步

時(shí)光飛逝,歲月如梭,轉(zhuǎn)眼又是一年過去了,本小仙怎么還是一事無成呢!

轉(zhuǎn)念一想,這種事也不是一次兩次了,再多一個(gè)又何妨,哈哈!

回歸正題,今天就給大家介紹下直方圖(histogram)的“好兄弟”——條形圖(bar chart)。
假設(shè)小仙同學(xué)現(xiàn)在要幫一家書店用圖形展示2018年最受大家歡迎的
書目,數(shù)據(jù)如下圖。

在這里插入圖片描述

條形圖畫出來還挺好看,可是跟小仙想象中的可不一樣。明明我的數(shù)據(jù)是按照銷量從高到低排列的,為什么畫出來卻是按照字母順序排列的呢?

在這里插入圖片描述

使用了對因子進(jìn)行排序的函數(shù)reorder()之后,就變成了下圖這個(gè)樣子,跟想象中的還是不一樣。

在這里插入圖片描述

在網(wǎng)上搜了半天教程,也沒有找到簡單的方法進(jìn)行對因子降序排序,于是小仙同學(xué)就大膽的在排序向量參數(shù)前面加了個(gè)減號,竟然沒有報(bào)錯(cuò)成功了,意外的驚喜(有時(shí)候大膽嘗試也會有驚喜哦,網(wǎng)上找教程還要先看懂別人的代碼,有時(shí)候發(fā)現(xiàn)看半天看懂了對自己并沒有幫助)。

在這里插入圖片描述

具體的作圖過程如下。

Step1. 繪圖數(shù)據(jù)的準(zhǔn)備

首先還是要把你想要繪圖的數(shù)據(jù)調(diào)整成R語言可以識別的格式excel中保存成csv格式。

Step2. 繪圖數(shù)據(jù)的讀取

data<-read.csv(“your file path”, header = T) 

Step3. 繪圖所需package的調(diào)用

library(ggplot2)
data$書名<-factor(data$書名)
data$書名<-reorder(data$書名,-data$銷量)

Step4. 因子水平排序

data$書名<-factor(data$書名)
data$書名<-reorder(data$書名,-data$銷量)

在這里插入圖片描述

Step5. 繪圖

p<-ggplot(data,aes(x=書名,y=銷量,fill=書名)) + 
   geom_bar(stat="identity",width = 0.5) +
   theme(axis.text.x = element_text(angle = 45, hjust = 0.8, vjust = 0.9))+
   xlab("銷量排行前十")+theme(legend.position="none")+
   scale_y_continuous("銷量",breaks = c(0,200000,400000,600000),labels = c("0","200000","400000","600000"))
p

在這里插入圖片描述

更新:有同學(xué)問怎么能把銷量在400000的柱子畫成同一種顏色,小仙今天終于克服懶惰來更新了
其實(shí)也很簡單,最主要的是要再加一列標(biāo)簽來表示顏色的分類

添加標(biāo)簽列

新的作圖代碼

新的作圖代碼,前面的都跟之前一樣,曉得吧

效果圖

新的效果圖

如果按照我的教程畫不出來,麻煩請告訴我

看別人的教程畫不出來可能是你的問題,看我的教程畫不出來一定是我的問題

更多關(guān)于R語言bar chart條形圖繪圖的資料請關(guān)注腳本之家其它相關(guān)文章!

相關(guān)文章

最新評論