R语言怎么绘制家庭金融资产配置变化图

这篇文章主要介绍“R语言怎么绘制家庭金融资产配置变化图”,在日常操作中,相信很多人在R语言怎么绘制家庭金融资产配置变化图问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答”R语言怎么绘制家庭金融资产配置变化图”的疑惑有所帮助!接下来,请跟着小编一起来学习吧!带有连接带的堆积柱形图:library(“ggplot2”)library(“showtext”)library(“Cairo”)font_add(“myfzhzh”,”方正正粗黑简体.TTF”)#原始数据:mydata
Class=c(“现金和活期存款”,”定期存款”,”货币基金”,”共同基金”,”养老基金”), Y1974=c(8,35,0.1,3,47), Y2016=c(2.5,22,2.7,31,53))mydata$Classgeom_rect()的规则是根据每一个多边形的边界点进行形状构建,所有我们需要获取15个矩形块中不重复的24个坐标点。根据以上思路,先构造两侧柱形图的数据源;bar1
Class=c(“现金和活期存款”,”定期存款”,”货币基金”,”共同基金”,”养老基金”), xmin=rep(0,5), xmax=rep(5,5), ymin=c(0,cumsum(mydata$Y1974)[1:4]), ymax=cumsum(mydata$Y1974), Year=”Y1974″, )bar2
Class=c(“现金和活期存款”,” 香港云主机定期存款”,”货币基金”,”共同基金”,”养老基金”), xmin=rep(25,5), xmax=rep(30,5), ymin=c(0,cumsum(mydata$Y2016)[1:4]), ymax=cumsum(mydata$Y2016), Year=”Y2016″ )mydata1
mydata1$Class
构造标签:mydata1$label_x=rep(c(2.5,27.5),each=5)mydata1$label_y=mydata1$ymin+(mydata1$ymax-mydata1$ymin)/2mydata1$value
构造中间的连接带数据源:midrect
midrect$id
midrect$ystart
midrect$yend
midrect$start
midrect$end
转置并构造中间的连接带单个多边形四角坐标点:midrect_data
names(midrect_data)
midrect_data$order
将这些坐标点数据转成长数据:midrect_data_final
midrect_data_final$long
midrect_data_final$Class
#绘图过程:color
CairoPNG(file=”E:/微信公众号/公众号——数据小魔方/2017年9月/20170922/bump_bar.png”,width=1200,height=900)showtext.begin()ggplot()+geom_rect(data=mydata1,aes(xmin=xmin,xmax=xmax,ymin=ymin,ymax=ymax,fill=Class),colour=”white”)+geom_text(data=mydata1,aes(x=label_x,y=label_y,label=paste(value,”%”)),family=”myfzhzh”,size=5,colour=”white”)+geom_text(data=NULL,aes(x=c(2.5,27.5),y=c(98,115),label=c(1974,2016)),size=10)+geom_polygon(data=midrect_data_final,aes(x=long,y=lat,fill=Class),colour=”white”)+ylim(0,115)+guides(fill=guide_legend(title=NULL)) +scale_fill_manual(values=color)+labs(title=”美国居民和非营利部门的金融资产分布与社会融资成本n(1974年至2016年)”, caption=”备注:金融资产数据来自于美联储发布的美国国家资产负债表年报,贷款利率数据来自世界银行官网。” )+theme_void(base_size=18,base_family=”myfzhzh”) %+replace%theme(legend.position=c(.25,.95),legend.direction =”horizontal”,plot.title=element_text(size=35,hjust=0),plot.caption=element_text(size=20,hjust=0),plot.margin=margin(10,0,10,0,unit=”pt”),legend.text=element_text(size=20))showtext.end()dev.off()到此,关于“R语言怎么绘制家庭金融资产配置变化图”的学习就结束了,希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习,快去试试吧!若想继续学习更多相关知识,请继续关注开发云网站,小编会继续努力为大家带来更多实用的文章!

相关推荐: win8系统如何禁止电脑自动安装设备

小编给大家分享一下win8系统如何禁止电脑自动安装设备,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!win8系统中禁止电脑自动安装设备方法/步骤:1.调出运行窗口,输入“gpedit…

免责声明:本站发布的图片视频文字,以转载和分享为主,文章观点不代表本站立场,本站不承担相关法律责任;如果涉及侵权请联系邮箱:360163164@qq.com举报,并提供相关证据,经查实将立刻删除涉嫌侵权内容。

(0)
打赏 微信扫一扫 微信扫一扫
上一篇 07/13 19:02
下一篇 07/13 19:02

相关推荐

发表评论

您的电子邮箱地址不会被公开。