R语言数据可视化 画并列条形图和堆叠条形图

本文将以R自带的数据集Titanic为例，来画并列条形图和堆叠条形图！！！！！

绘制并列条形图和堆叠条形图

我们可以看看数据集Titanic

?Titanic

从Titanic中是4X4的列联表，其中有 class、sex、age和survived 四个变量。

我以其中两个变量：Sex和Survived的并列条形图和堆叠条形图，并为条形图填上频数标签。

先提取Sex和Survived的列联表，代码如下：

tab=margin.table(Titanic,margin = c("Sex","Survived"))

绘制图形

par(mfrow=c(1,2),mai=c(0.7,0.7,0.8,0.7),cex=0.6)#设置一页两图
#绘制并列条形图
b1=barplot(tab,beside=T,xlab = "Survived",ylab="人数",ylim=c(0,1500),col=rainbow(7),
           main = "图1.1 并列条形图",legend.text=c("male","female"),
           args.legend=list(x = 6,y=1400))  
text(b1,tab,labels = tab,pos = 3)#设置频数标签
#绘制堆叠条形图 
b2=barplot(tab,beside=F,xlab = "Survived",ylab="人数",ylim=c(0,1500),col=rainbow(7),
           main = "图1.2 堆叠条形图",legend.text=c("male","female"),
           args.legend=list(x =3,y=1400))  
text(b2,tab,labels = tab,pos = 3) #设置频数标签

代码运行结果图像：

 结语：

刚学R语言，写文章为了见证自己的学习成果，不喜勿愤！！！！笑迎指正错误！！！