R语言NBA数据分析案例附代码数据

霍城76人印第安纳步行者 明意布聲克林篮网密尔沃基雄鹿Rplot. jpeg制N B A科比 藹lit球帝遼牛王朝常禅晦瞬魔术师约翰逊十写在前面的话莎士比亚说过：一千个人眼里有一千个哈姆雷特。”这就像不同的球迷心中都有自己心爱的球星与 球队。在NBA70多载的历史长河中，演绎过无数次的经典对决，而总决赛的PK更是荡气回肠、精彩绝伦。 作为缔造者，这些伟大的球队更是承载着一代球迷的回忆，如果想要选出最强的球队，无疑是鸡蛋 里挑骨头，几乎是一项不可能完成的任务。然而我们经常会在比如虎扑论坛看到关于最强冠军队伍 的讨论，这说明J Rs对这个话题的执着热情。虽然这是一件仁者见仁智者见智的事情，亦或者部分 狂热球迷会带着爱屋及乌的那份支持与期待。实则一场球赛的成败关乎太多因素，有许多LIVE偶然无法预测，作为一个狂热的球迷，结合多年 的看比赛及实战经验，同时结合历史上多场经典赛事，今天结合真实数据来揭秘一场球赛成功背后 哪些必不可缺少的因素。接下来且听小编一本正经的胡说八道！最强冠军球队候选人时间：公牛王朝兀年（991赛季）一赛季，因为公牛王朝是绝大多数球迷最初的NBA记忆，而数据方面只记录到1516赛 季，所以只能忽略今年这只勇士队了。连续两年或者三年内两次打入总决赛的冠军队伍，出于考虑到队伍持久、稳定的竞争力。候选人登场赛季冠 军 球 队对 手 球 队对阵比方高光概略19911992公牛开拓者4:2常规赛：6715，总决赛面对开拓者，轻松写意地4:2 结束战斗，在总决赛上，乔丹不断命中三分，耸肩作 轻松样成为经典赛季军球队手球队对阵比方高光概略19941995火刖魔术4:0赛季中期加入滑翔机一德雷克斯勒，联手大梦，在总 决赛兵不血刃地以4:0横扫，新秀即以巅峰状态示人 的大鲨鱼一奥尼尔和便士哈达威领衔的魔术队19951996公牛超音速4:2常规赛：72-10的神迹，一直保持到了 1516赛季，公牛王朝最强的一年，没毛病20002001湖人76人4:1巅峰期的OK组合，打起球来让对手想骂人，季后赛15:1，只因AI逆天的手感才被打破不败金身20022003马刺篮网4:2巅峰期的邓肯搭档老当益壮的名人堂成员大卫罗宾 逊组成内线双塔，更有帕克，吉诺比利，GDP组合也 已然有了雏形，板凳上还有史蒂夫科尔20072008凯 尔 特 人湖人4:4加内特、雷阿伦、皮尔斯组成的绿军三巨头，后卫线 又有朗多，在总决赛上，以4:2击败科比领衔的湖人 队凯20092010湖人尔 特4:3科比搭档家嫂连续三年进入总决赛，与绿军大战七场， 实现总决赛比分上的逆转，也成功的复仇了绿军人20122013执八、火马刺4:3热火与马刺纠缠了7场才分胜负，其中第六场雷阿伦终场前迎着帕克投入的关键三分镜头已为经典20142015勇士骑 士4:1这是一只跨时代的球队，打破依据离篮筐越近，命中 率越高为基本原则的“铁律”，将炮轰上升到另一个层 次，而且它还在进化，着实让人可怕20152016骑 士勇士4:3在库里腿伤未完全恢复和博古特意外报销的情况，骑 士队抓住了机会，实现逆转，随着第七场，欧文一对 一单挑库里投入致胜三分，仍是将总冠军抢到手附录.NBA各球队缩写简称与正式名称对照表球队简称正式名称CHI芝加哥公牛HOU休斯顿火箭SAS圣安东尼奥马刺对冠球队简称正式名称GSW金州勇士LAL洛杉矶湖人BOS波士顿凯尔特人MIA迈阿密热火CLE克里弗兰骑士数据预处理待处理数据team_season.csv team_playoff.csv数据处理过程数据时间太过散乱，不方便进行分类处理，故需要针对时间区间添力加赛季”列选出上面十个总冠军队伍常规赛、季后赛，球队与对手的各项数据均值计算冠军队伍的高阶数据：进攻效率值和防守效率值，并实现数据可视化#加载R语言包library(dplyr)library(stringr)library(ggplot2)champion_name -c(CHI,HOU,CHI,LAL,SAS,BOS,LAL,MIA,GSW,CLE)Season_list -c(91-92,94-95,95-96,00-21,02-03,07-08,09-10,12-13,14-15,15-16)champions - data.frame(champion_name,Season_list,stringsAsFactors=F)#赛季数据简单处理simple_db - function(team_season)team_season$ 对手-str_sub(team_season$ 比分,start = 1,end = 3)team_season$时间 as.Date(1985-9-ll) & team_season$时间 as.Date(1986-8-ll) as.Date(1986-9-ll) & team_season$时间 as.Date(1987-8-ll) as.Date(1987-9-ll) & team_season$时间 as.Date(1988-8-ll) as.Date(1988-9-ll) & team_season$时间 as.Date(1989-8-ll) as.Date(1989-9-ll) & team_season$时间 as.Date(1990-8-ll) as.Date(1990-9-ll) & team_season$时间 as.Date(1991-8-ll) as.Date(1991-9-ll) & team_season$时间 as.Date(1992-8-ll) as.Date(1992-9-ll) & team_season$时间 as.Date(1993-8-ll) as.Date(1993-9-ll) & team_season$时间 as.Date(1994-8-ll) as.Date(1994-9-ll) & team_season$时间 as.Date(1995-8-ll) as.Date(1995-9-ll) & team_season$时间 as.Date(1996-8-ll) as.Date(1996-9-ll) & team_season$时间 as.Date(1997-8-ll) as.Date(1997-9-ll) & team_season$时间 as.Date(1998-8-ll) as.Date(1998-9-ll) & team_season$时间 as.Date(1999-8-ll) as.Date(1999-9-ll) & team_season$时间 as.Date(2000-8-ll) as.Date(2000-9-ll) & team_season$时间 as.Date(2001-8-ll) as.Date(2001-9-ll) & team_season$时间 as.Date(2002-8-ll) as.Date(2002-9-11) & team_season$时间 as.Date(2003-8-11) as.Date(2003-9-11) & team_season$时间 as.Date(2004-8-11) as.Date(2004-9-11) & team_season$时间 as.Date(2005-8-11) as.Date(2005-9-11) & team_season$时间 as.Date(2006-8-11) as.Date(2006-9-11) & team_season$时间 as.Date(2007-8-11) as.Date(2007-9-11) & team_season$时间 as.Date(2008-8-11) as.Date(2008-9-11) & team_season$时间 as.Date(2009-8-11) as.Date(2009-9-11) & team_season$时间 as.Date(2010-8-11) as.Date(2010-9-ll) & team_season$时间 as.Date(2011-8-ll) as.Date(2011-9-11) & team_season$时间 as.Date(2012-8-11) as.Date(2012-9-11) & team_season$时间 as.Date(2013-8-11) as.Date(2013-9-11) & team_season$时间 as.Date(2014-8-11) as.Date(2014-9-11) & team_season$时间 as.Date(2015-8-11) as.Date(2015-9-11) & team_season$时间 as.Date(2016-8-11) -15-16 return(team_season)#球队赛季数据处理season_general - function(season_db, season, team)team_season_db -filter(season_db,赛季=season,球队=team)team_season_General %group_b y(球队)%summarise(场次=n(),赛季=season,胜场=length(which(结果=W),负场=length(which(结果=L),投篮=mean(投篮,na.rm = TRUE),命中=mean(命中,na.rm = TRUE),岀手=mean (岀手,na.rm = TRUE),三分=mean(三分,na.rm = TRUE),三分命中=mean(三分命中,na.rm = TRUE),三分岀手=mean(三分岀手,na.rm = TRUE),常规赛攻防力CHI-91-92CHI-95S6112-M1A 12 13+ 00-01* 0203110-SO&D7 0B104-9BGSW-14 15 Q7-0S100102防守效率值* 09 ia 12 13CLE-15-1S 1&16104#对手赛季数据处理Opp_season_general - function（season_db, season, team）Opp_team_season_db v-filter（season_db,赛季=season,对手=team）Opp_team_season_General %group_b y（对手）%summarise（91 -92,CHI)Opp_CHI_91_92_Generalv- Opp_season_general(team_season,CHI_91_92_Tot -cbind(CHI_91_92_General,Opp_CHI_91_92_General,-l)# 94-95赛季火箭队HOU_94_95_General - season_general(team_season,94-95,HOU)Opp_HOU_94_95_General- Opp_season_general(team_season, 94-95,HOU)HOU_94_95_Tot -cbind(HOU_94_95_General,Opp_HOU_94_95_General,-l)# 95-96赛季公牛队CHI_95_96_General - season_general(team_season,95-96,CHI)Opp_CHI_95_96_General- Opp_season_general(team_season, 95-96,CHI)CHI_95_96_Tot - cbind(CHI_95_96_General,Opp_CHI_95_96_General,-l)# 00-01赛季湖人队LAL_00_01_General - season_general(team_season,00-01,LAL)Opp_LAL_OO_Ol_General- Opp_season_general(team_season, 00-01,LAL)LAL_00_01_Tot - cbind(LAL_OO_Ol_General,Opp_LAL_OO_Ol_General,-l)# 02-03赛季马刺队SAS_02_O3_General - season_general(team_season,02-03,SAS)Opp_SAS_02_03_General- Opp_season_general(team_season, 02-03,SAS)SAS_02_03_Tot - cbind(SAS_02_03_General,Opp_SAS_02_03_General,-1)常规赛表现回顾09-10T2-134 155-16【原创】附代码数据有问题到淘宝找“大数据部落”就可以了常规赛攻防力胜负分上双总共有三支队伍：球队赛季胜负分公牛919210.360832公牛959612.376957勇士141510.097561常规赛战力最差的三支队伍：球队赛季胜负分有问题到淘宝找“大数据部落”就可以了球队赛季胜负分火箭94951.187669湖人00013.579094湖人09104.432622总结乔帮主带队伍是扛扛的，火箭夺冠之路走得确实辛苦，真是一场一场拼出来的，湖人由于伤病再加 上自己得意又爱浪的特点，时不时出现注意力不集中，放松的毛病乔丹jpg季后赛表现回顾* 00-010 09-104-15V A-12-i35-16BOS-D7-03【原创】附代码数据有问题到淘宝找“大数据部落”就可以了S静観督姻垂后赛攻防力胜负分上双【总共有二支队伍：球队赛季胜负分公牛959611.722222湖人000112.750000季后赛战力最差的三支队伍:球队赛季胜负分火箭94952.772727【原创】附代码数据有问题到淘宝找“大数据部落”就可以了球队赛季胜负分马刺02033.069444湖人09103.826087总结00-01赛季的湖人常规赛装死，季后赛才露出自己的獠牙，各队被打服，心痛AI 一分钟，95-96赛 季的公牛队堪称完美，常规赛与季后赛一样大杀四方，乔帮主表示无压力，任凭，手套”垃圾话和全 场领防。火箭季后赛有小幅上升，但还是坐稳末把交椅。马刺波波和石佛在西部被湖人压了这么些 年，从这战力，也能看出部分原因。