網(wǎng)上有很多關(guān)于pos機組織語言,R語言ggplot2蝴蝶圖——美美的商務(wù)范兒的知識，也有很多人為大家解答關(guān)于pos機組織語言的問題，今天pos機之家(m.nxzs9ef.cn)為大家整理了關(guān)于這方面的知識，讓我們一起來看下吧!

本文目錄一覽：

1、pos機組織語言

pos機組織語言

一個小案例，使用ggplot2繪制蝴蝶圖，在鞏固溫習(xí)條形圖坐標軸翻轉(zhuǎn)的同時，重新熟悉一下如何利用grid系統(tǒng)進行版式布局。

原圖如下：

該圖表思路很簡單，就是兩個條形圖通過坐標軸翻轉(zhuǎn)，使用grid包中的版式布局函數(shù)進行合理的版式拼接即可。

以下是整個案例代碼部分,因為涉及到的知識點不復(fù)雜，這里不做詳細注釋：

第一部分：制作右側(cè)的柱形圖：

#導(dǎo)入工具包：library("ggplot2")library("dplyr")library("grid")library("showtext")library("Cairo")font.add("myfont","msyh.ttc")

#生成圖形所需數(shù)據(jù)集：mydata<-data.frame(id=1:14,A=c(5.0,14.7,2.5,8.5,5.1,6.9,7.7,6.8,4.4,4.9,5.3,1.0,0.9,7.8),B=c(31.3,24.7,17.8,17.2,15.3,14.3,13.9,13.9,12.4,10.0,6.5,4.2,2.5,0.9),Label=c("Website","Customer & Employee Referral","Webinar","Facebook/Twitter/Other Social","Marketting & Advertising","Paid Serch","Other","Sales generated","Tradeshows","Parter","Linkedin","Events","Lead list","Emial Campaign"))

p1<-ggplot(mydata)+geom_hline(yintercept=mean(mydata$A),linetype=2,size=.25,colour="grey")+geom_bar(aes(x=id,y=A),stat="identity",fill="#E2BB1E",colour=NA)+ylim(-5.5,16)+scale_x_reverse()+geom_text(aes(x=id,y=-4,label=Label),vjust=.5)+geom_text(aes(x=id,y=A+.75,label=paste0(A,"%")),size=4.5,family="myfont",fontface="bold")+coord_flip()+theme_void();p1#圖一：第二部：制作左側(cè)柱形圖：

p2<-ggplot(mydata)+geom_hline(yintercept=-mean(mydata$B),linetype=2,size=.25,colour="grey")+geom_bar(aes(x=id,y=-B),stat="identity",fill="#C44E4C",colour=NA)+ylim(-40,0)+scale_x_reverse()+geom_text(aes(x=id,y=-B-1.75,label=paste0(B,"%")),size=4.5,family="myfont",fontface="bold")+coord_flip()+theme_void();p2#圖二效果圖形整合：

setwd("E:/數(shù)據(jù)可視化/R/R語言學(xué)習(xí)筆記/數(shù)據(jù)可視化/ggplot2/優(yōu)秀R語言案例")CairoPNG(file="butterfly.png",width="360px",height="auto" />

black",fontsize=15,fontfamily="myfzhzh",draw=TRUE,just="centre"))grid.text(label="Lead-to-Opportunity\Conversion Rate",x=.20,y=.88,gp=gpar(col="black",fontsize=15,fontfamily="myfzhzh",draw=TRUE,just="centre"))grid.text(label="Webinars convert opportunities,but don\'t close",x=.50,y=.95,gp=gpar(col="black",fontsize=20,fontfamily="myfzhzh",draw=TRUE,just="centre"))showtext.end()dev.off()

注意以上代碼中所使用的coord_flip函數(shù)、geom_text函數(shù)以及最后的grid系列函數(shù)的用法。

以上就是關(guān)于pos機組織語言,R語言ggplot2蝴蝶圖——美美的商務(wù)范兒的知識，后面我們會繼續(xù)為大家整理關(guān)于pos機組織語言的知識，希望能夠幫助到大家！