数据可视化有意思的小例子：使用R语言探索NBA球星库里常规赛的数据 |
您所在的位置：网站首页 › nba球星大头贴 › 数据可视化有意思的小例子：使用R语言探索NBA球星库里常规赛的数据 |
数据可视化有意思的小例子：使用R语言探索NBA球星库里常规赛的数据
|
数据集来自于kaggle https://www.kaggle.com/mujinjo/stephen-curry-stats-20092021-in-nba 数据集里收集了NBA勇士队当家球星库里09-21赛季常规赛的数据，总共是761场比赛的数据 数据来源 espn https://www.espn.com/nba/player/gamelog/_/id/3975/type/nba/year/2010 数据爬取的python代码链接 https://www.kaggle.com/mujinjo/making-curry-stats-dataset-mjjo 选取数据接下来的探索用到的数据集变量有 赛季对手胜负命中数出手次数三分命中数三分出手次数罚球命中数罚球次数篮板助攻盖帽抢断个人犯规次数失误得分代码语言：javascript复制library(tidyverse) df% select(1,4,5,8,10,11,14,15,18,19,21:27) -> dfa 首先来看看库里常规赛的胜率 代码语言：javascript复制table(dfa$Result) image.png 胜率高达65% 接下来看看库里面对不同对手的胜率 代码语言：javascript复制library(ggplot2) table(dfa$OPP,dfa$Result) %>% as.data.frame() %>% ggplot(aes(x=Var1,y=Freq,fill=Var2))+ geom_bar(stat="identity",position = "dodge")+ theme_bw()+ scale_y_continuous(expand = c(0,0), limits = c(0,30))+ theme(legend.position = "top", legend.title = element_blank(), panel.grid = element_blank())+ scale_fill_manual(values = c("#5a72b5", "#ea5a49"))+ labs(x=NULL,y=NULL)+ geom_rect(aes(xmin=2.5,xmax=3.5,ymax=29,ymin=0), fill="white",alpha=0,color="black", lty="dashed")+ ggsave("1.pdf", width = 9.4, height = 4, family="serif") image.png 我们可以看到面对不同的对手库里都是胜多负少，唯独有一个例外，就是面对凯尔特人是打了一个平手 接下来再来看看库里每个赛季的得分情况 代码语言：javascript复制library(tidyquant) library(patchwork) x1 p1 image.png 接下来添加一个库里的大头贴 代码语言：javascript复制 here::here("Curry","i.png") img |
【本文地址】