怎样使用R语言ggplot2画山脊图展示NBA球员出手距离的分布

这篇文章给大家介绍怎样使用R语言ggplot2画山脊图展示NBA球员出手距离的分布,内容非常详细,感兴趣的小伙伴们可以参考借鉴,希望对大家能有所帮助。

10年积累的成都做网站、网站设计经验,可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你,你也不认识我。但先网站设计制作后付款的网站建设流程,更有门头沟免费网站建设让你可以放心的选择与我们合作。

主要内容是探索了NBA 14/15赛季常规赛MVP排行榜前四名 库里 哈登 詹姆斯 威少的投篮数据。今天重复第一个内容:用R语言的ggplot2画山脊图展示以上四人的投篮出手距离的分布。

原始数据集下载自kaggle

https://www.kaggle.com/dansbecker/nba-shot-logs

对原始数据集进行清洗的代码 https://github.com/nycdatasci/bootcamp007_project/tree/master/Project1-ExploreVis/Xinyuan_Wu

这部分代码我们就不关注了,直接运行得到作图的数据 数据清洗的代码我已经运行好了,需要本文的示例数据可以直接留言

 首先读入清洗好的数据
df<-read.csv("NBA_MVP-1.tsv",header=T,sep="\t")
 

这边遇到一个问题是:如果用read.table()函数读入数据read.table("NBA_MVP-1.tsv",header=T,sep="\t")就会报错Error in scan(file = file, what = what, sep = sep, quote = quote, dec = dec, : line 145 did not have 21 elements这个是什么原因呢?暂时还没有搞懂

 完整的作图代码
library(ggplot2)
library(ggthemes)
ggplot(data=df,aes(x=dist_cut))+
  geom_density(aes(fill=player_name))+
  facet_grid(player_name~.)+
  theme_gdocs()+
  theme(axis.text.y = element_blank())+
  labs(x="Shot Distance",y="Shot Density")+
  ggtitle("Shot Distance")+
  scale_fill_manual("Players", 
                    values = c("#FFCC33", "#FF3300", "#990000", "#0066FF"))
 

最终结果

怎样使用R语言ggplot2画山脊图展示NBA球员出手距离的分布  
image.png
 解释代码
library(ggplot2)
library(ggthemes)
 

加载用到的包

  • ggplot2用来作图
  • ggthemes用来补充一些ggplot2的主题

最基本的密度图

ggplot(data=df,aes(x=dist_cut))+
  geom_density(aes(fill=player_name))
 

根据运动员的名字分面

ggplot(data=df,aes(x=dist_cut))+
  geom_density(aes(fill=player_name))+
  facet_grid(player_name~.)
 

设置一个作图的主题

ggplot(data=df,aes(x=dist_cut))+
  geom_density(aes(fill=player_name))+
  facet_grid(player_name~.)+
  theme_gdocs()
 

去掉y轴的刻度标签

ggplot(data=df,aes(x=dist_cut))+
  geom_density(aes(fill=player_name))+
  facet_grid(player_name~.)+
  theme_gdocs()+
  theme(axis.text.y = element_blank())
 

更改坐标轴的标题

ggplot(data=df,aes(x=dist_cut))+
  geom_density(aes(fill=player_name))+
  facet_grid(player_name~.)+
  theme_gdocs()+
  theme(axis.text.y = element_blank())+
  labs(x="Shot Distance",y="Shot Density")
 

给整幅图添加一个标题

ggplot(data=df,aes(x=dist_cut))+
  geom_density(aes(fill=player_name))+
  facet_grid(player_name~.)+
  theme_gdocs()+
  theme(axis.text.y = element_blank())+
  labs(x="Shot Distance",y="Shot Density")+
  ggtitle("Shot Distance")
 

自定义填充的颜色并且更改图例的标题

ggplot(data=df,aes(x=dist_cut))+
  geom_density(aes(fill=player_name))+
  facet_grid(player_name~.)+
  theme_gdocs()+
  theme(axis.text.y = element_blank())+
  labs(x="Shot Distance",y="Shot Density")+
  ggtitle("Shot Distance")+
  scale_fill_manual("Players", 
                    values = c("#FFCC33", "#FF3300", "#990000", "#0066FF"))
    大家可以自己从最基本的密度图然后逐步向上叠加代码看看效果

关于怎样使用R语言ggplot2画山脊图展示NBA球员出手距离的分布就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。


本文题目:怎样使用R语言ggplot2画山脊图展示NBA球员出手距离的分布
转载注明:http://bzwzjz.com/article/ihideh.html

其他资讯

Copyright © 2007-2020 广东宝晨空调科技有限公司 All Rights Reserved 粤ICP备2022107769号
友情链接: 成都模版网站建设 成都网站设计公司 定制网站设计 成都商城网站建设 成都网站建设 网站设计公司 网站建设方案 宜宾网站设计 网站制作公司 重庆网站设计 专业网站设计 外贸网站建设 网站建设改版 成都网站建设 成都网站制作 成都网站建设 营销网站建设 泸州网站建设 企业网站建设 企业网站设计 四川成都网站建设 网站制作报价