Group Members: Mujde-R

A. Key Takeaways

We have rewieved the football match statistics and Turkish football teams, in the last 25 years. The match statistics data is available on football-data.co.uk
We examined the league teams for 25 years and found out how many times a team managed to attend Turkish Super Leauge. Throughout 25 years, only 4 teams succeded to be champion and total points of those champions flactuates between 69-85 points interval. When we deep dived into breakdown of those points, champion teams scored more point in thier home matches than away matches. It was interesting to see how scored goals/scored points ratio varies among champions.
We compared half season and total season rankings especially to understand journey of a leaguers in terms of stability. Especially for champions and relegated teams, half season rankings gave us a clear idea about their end results.
We defined two new rankings as scored goal ranking and mininum conceded goal ranking alongside the classical score ranking to detail the performance of the champions. Apparently, scored goal number and conceded goal number have different weigths to bring the success to the champion.
In order to build a better understanding of the successes of the champions, we looked at their consecutive win, unbeaten and losing streaks.

B. Dataset

Our data starts from 94-95 season with 6 variable (Date, HomeTeam, AwayTeam, FTHG, FTAG and FTR)
In 1991 3 new variables are added as half-time results (HTHG, HTAG, HTR)
In 2017 12 new variables are added as very-detailed match statistics
We found out that the 2009-2019 season is organized with 17 teams. (Ankaraspor were reduced cluster by Turkish Football Federation)
We have various betting statistics data. But we will come this to later
The descriptions of variables are as below:
- Season: Year which season is started
- Date: date
- HomeTeam: Home Team
- AwayTeam: Away Team
- FTHG : Full-time - Home Team Goal Scored
- FTAG : Full-time - Away Team Goal Scored
- FTR : Full-time Match Result (H=Home Win, D=Draw, A=Away Win)
- HTHG: Half-time - Home Team Goal Scored
- HTAG: Half-time - Away Team Goal Scored
- HTR: Half-time Match Result (H=Home Win, D=Draw, A=Away Win)
- HS: Home Team shots
- AS: Away Team Shots
- HST: Home Team Shots on Target
- AST: Away Team Shots on Target
- HF: Home Team Fouls Committed
- AF: Away Team Fouls Committed
- HC = Home Team Corners
- AC = Away Team Corners
- HY = Home Team Yellow Cards
- AY = Away Team Yellow Cards
- HR = Home Team Red Cards
- AR = Away Team Red Cards

options(width = 999)
library(plyr)
library(dplyr)
library(kableExtra)
library(knitr)
library(ggplot2)
library(plotly)
library(reshape2)

1. Uploading the Dataset

We imported the data our github account as raw csv format.
You can see the imported raw data by clicking here.

2. Reading the Raw Data

We downloaded the 25 year raw data and bind them all.
We added Season column to use as startYear index

get_data_url <- function(start_year) {
  data_url <- paste("https://github.com/pjournal/mef03g-mujde-r/blob/master/Group%20Project/Raw%20Data/", start_year, "-",
                    start_year + 1, ".csv?raw=true", sep='')
  return (data_url)
}

get_data_between_years <- function (start_year, end_year){
all_raw_data <- data.frame()
  for (year in seq(start_year, end_year)) {
    data_url <- get_data_url(year)
    raw_data <- read.csv(data_url,skip=1,sep=',',header=F)
    raw_data <- raw_data %>% mutate(V1 = year)
    if(year < 1999){
      all_raw_data <- rbind.fill(all_raw_data, raw_data)
    } else if(year < 2017){
      ## First 10 variables
      all_raw_data <- rbind.fill(all_raw_data, raw_data[c(1:10)])
    } else{
      ## First 22 variables
      all_raw_data <- rbind.fill(all_raw_data, raw_data[c(1:22)])
    }
  }
  return (all_raw_data)
}
raw_data <- get_data_between_years(1994, 2018)

2. Data Preparation

We added rowIndex
We added weekIndex by using rowIndex
We mapped some teams which changed their names in years
- Antalya –> Antalyaspor
- Kayseri –> Kayserispor
- Istanbulspor –> Buyuksehyr
- Yeni Malatyaspor –> Malatyaspor
- Hacettepespor –> Ankaraspor
- Osmanlispor –> Ankaraspor
- Erzurum BB –> Erzurumspor
- Erzurum –> Erzurumspor

## A season contains 34 match weeks
totalWeekCount = 34
## As 18 teams are in league, there are 9 matches every week
totalMatchPerWeek = 9
## In 2009 there are 17 teams in league therefore there are 8 matches every week
totalMatchPerweek_2009 = 8
totalMatchCountUntil2009 = totalWeekCount * totalMatchPerWeek * 15
totalMatchCountIn2009 = totalWeekCount * totalMatchPerweek_2009

all_data <- raw_data %>% mutate(rowIndex = seq.int(nrow(raw_data)))
all_data <- all_data %>% mutate(weekIndex = case_when(V1 < 2009 ~ (((rowIndex - 1) %/% totalMatchPerWeek) %% 34) + 1,
V1 == 2009 ~(((rowIndex - totalMatchCountUntil2009 - 1) %/% totalMatchPerweek_2009) %% 34 + 1),
V1 > 2009 ~(((rowIndex - totalMatchCountUntil2009 - totalMatchCountIn2009 - 1) %/%
totalMatchPerWeek) %% 34 + 1)))

colnames(all_data)<-c("season","date","HomeTeam","AwayTeam","FTHG","FTAG","FTR","HTHG","HTAG","HTR","HS","AS","HST","AST","HF","AF","HC","AC","HY","AY","HR","AR", "rowIndex", "weekIndex")

all_data[all_data == "Antalya"] <- "Antalyaspor"
all_data[all_data == "Kayseri"] <- "Kayserispor"
all_data[all_data == "Istanbulspor"] <- "Buyuksehyr"
all_data[all_data == "Yeni Malatyaspor"] <- "Malatyaspor"
all_data[all_data == "Hacettepespor"] <- "Ankaraspor"
all_data[all_data == "Osmanlispor"] <- "Ankaraspor"
all_data[all_data == "Erzurum BB"] <- "Erzurumspor"
all_data[all_data == "Erzurum"] <- "Erzurumspor"

str(all_data)

## 'data.frame':    7616 obs. of  24 variables:
##  $ season   : int  1994 1994 1994 1994 1994 1994 1994 1994 1994 1994 ...
##  $ date     : Factor w/ 2467 levels "1/10/1994","10/9/1994",..: 9 12 12 12 12 12 12 12 12 26 ...
##  $ HomeTeam : Factor w/ 57 levels "Ad. Demirspor",..: 18 1 3 6 7 9 13 16 17 8 ...
##  $ AwayTeam : Factor w/ 57 levels "Ad. Demirspor",..: 8 19 10 14 5 11 15 2 41 3 ...
##  $ FTHG     : int  1 1 1 5 1 3 0 3 3 2 ...
##  $ FTAG     : int  4 0 0 2 3 1 0 1 0 1 ...
##  $ FTR      : Factor w/ 3 levels "A","D","H": 1 3 3 3 1 3 2 3 3 3 ...
##  $ HTHG     : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ HTAG     : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ HTR      : Factor w/ 4 levels "","A","D","H": NA NA NA NA NA NA NA NA NA NA ...
##  $ HS       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ AS       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ HST      : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ AST      : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ HF       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ AF       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ HC       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ AC       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ HY       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ AY       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ HR       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ AR       : int  NA NA NA NA NA NA NA NA NA NA ...
##  $ rowIndex : int  1 2 3 4 5 6 7 8 9 10 ...
##  $ weekIndex: num  1 1 1 1 1 1 1 1 1 2 ...

3. Creating Half-Season and End-Season Team Rankings

get_season_statistics <- function(all_data) {
  all_statistics <- all_data %>% mutate(home_team_point = case_when(FTR == 'H' ~ 3, FTR == 'D' ~ 1, FTR == 'A' ~ 0),
                                away_team_point = case_when(FTR == 'A' ~ 3, FTR == 'D' ~ 1, FTR == 'H' ~ 0),
                                home_team_point_half = case_when(weekIndex < 18 & FTR == 'H' ~ 3, 
                                                                 weekIndex < 18 & FTR == 'D' ~ 1, 
                                                                 weekIndex < 18 & FTR == 'A' ~ 0, 
                                                                 weekIndex >= 18 ~ 0),
                                away_team_point_half = case_when(weekIndex < 18 & FTR == 'A' ~ 3, 
                                                                 weekIndex < 18 & FTR == 'D' ~ 1, 
                                                                 weekIndex < 18 & FTR == 'H' ~ 0, 
                                                                 weekIndex >= 18 ~ 0))
  home_season_statistics <- all_statistics %>% group_by(season, HomeTeam) %>% 
  summarise(point = sum(home_team_point), home_point_half = sum(home_team_point_half), HG = sum(FTHG), HC = sum(FTAG), difference = HG - HC,
            avg_home_p = mean(home_team_point)) %>% 
  mutate(team=HomeTeam) %>% 
  select(season, team, home_point_half, point, HG, HC, difference, avg_home_p) %>% 
  arrange(desc(point))
  
  away_season_statistics <- all_statistics %>% group_by(season, AwayTeam) %>% 
  summarise(point = sum(away_team_point), away_point_half = sum(away_team_point_half), AG = sum(FTAG), AC = sum(FTHG), difference = AG - AC,
            avg_away_p = mean(away_team_point)) %>% 
  mutate(team=AwayTeam) %>% 
  select(season, away_point_half, team, point, AG, AC, difference, avg_away_p) %>% 
  arrange(desc(point))
  
  season_statistics<- full_join(home_season_statistics,away_season_statistics,by=c("season","team"))%>%
    mutate(total_point=point.x+point.y, goal_scored = HG + AG, goal_conceded = HC + AC, home_goal = HG, home_conceded = HC,
           away_goal = AG, away_conceded = AC, 
           goal_difference = goal_scored - goal_conceded,
           total_point_half = home_point_half + away_point_half,
           avg_total_p = avg_home_p + avg_away_p) %>% arrange(desc(season,total_point, goal_difference)) %>% 
    select(season, team, total_point, goal_scored, goal_conceded, goal_difference, total_point_half, avg_home_p,
           avg_away_p, avg_total_p, home_goal, home_conceded, away_goal, away_conceded) 
}

  season_statistics <- get_season_statistics(all_data)
  
  kable(season_statistics) %>% kable_styling("striped", full_width = F) %>%
  scroll_box(width = "100%", height = "400px")

season	team	total_point	goal_scored	goal_conceded	goal_difference	total_point_half	avg_home_p	avg_away_p	avg_total_p	home_goal	home_conceded	away_goal	away_conceded
2018	Galatasaray	69	72	36	36	29	2.5294118	1.5294118	4.0588235	47	12	25	24
2018	Besiktas	65	72	47	25	26	2.2941176	1.5294118	3.8235294	37	21	35	26
2018	Trabzonspor	63	64	46	18	29	2.2352941	1.4705882	3.7058824	39	20	25	26
2018	Buyuksehyr	67	49	22	27	35	2.0588235	1.8823529	3.9411765	27	11	22	11
2018	Fenerbahce	46	44	44	0	16	1.8235294	0.8823529	2.7058824	30	22	14	22
2018	Malatyaspor	47	47	46	1	29	1.8235294	0.9411765	2.7647059	31	19	16	27
2018	Alanyaspor	44	37	43	-6	18	1.8235294	0.7647059	2.5882353	23	13	14	30
2018	Goztep	38	37	42	-5	22	1.5882353	0.6470588	2.2352941	24	20	13	22
2018	Sivasspor	41	49	54	-5	24	1.5882353	0.8235294	2.4117647	24	18	25	36
2018	Kayserispor	41	35	50	-15	19	1.4117647	1.0000000	2.4117647	17	20	18	30
2018	Kasimpasa	39	53	62	-9	29	1.4117647	0.8823529	2.2941176	30	27	23	35
2018	Ankaragucu	40	38	53	-15	20	1.3529412	1.0000000	2.3529412	20	22	18	31
2018	Antalyaspor	45	39	55	-16	27	1.3529412	1.2941176	2.6470588	22	22	17	33
2018	Konyaspor	44	40	38	2	25	1.3529412	1.2352941	2.5882353	20	17	20	21
2018	Rizespor	41	48	50	-2	12	1.2941176	1.1176471	2.4117647	27	24	21	26
2018	Erzurumspor	35	36	43	-7	16	1.2352941	0.8235294	2.0588235	18	20	18	23
2018	Bursaspor	37	28	37	-9	21	1.1764706	1.0000000	2.1764706	14	16	14	21
2018	Akhisar Belediyespor	27	34	54	-20	17	1.0588235	0.5294118	1.5882353	22	26	12	28
2017	Galatasaray	75	75	33	42	35	2.8823529	1.5294118	4.4117647	46	9	29	24
2017	Besiktas	71	69	30	39	30	2.6470588	1.5294118	4.1764706	44	10	25	20
2017	Buyuksehyr	72	62	34	28	36	2.4705882	1.7647059	4.2352941	36	14	26	20
2017	Fenerbahce	72	78	36	42	33	2.1764706	2.0588235	4.2352941	42	23	36	13
2017	Sivasspor	49	45	53	-8	26	1.8235294	1.0588235	2.8823529	26	20	19	33
2017	Trabzonspor	55	63	51	12	29	1.7058824	1.5294118	3.2352941	33	28	30	23
2017	Goztep	49	49	50	-1	30	1.7058824	1.1764706	2.8823529	30	23	19	27
2017	Bursaspor	39	43	48	-5	25	1.6470588	0.6470588	2.2941176	24	18	19	30
2017	Kasimpasa	46	57	58	-1	19	1.6470588	1.0588235	2.7058824	32	29	25	29
2017	Malatyaspor	43	38	45	-7	22	1.5882353	0.9411765	2.5294118	25	21	13	24
2017	Konyaspor	36	38	42	-4	15	1.5882353	0.5294118	2.1176471	24	15	14	27
2017	Kayserispor	44	44	55	-11	30	1.5294118	1.0588235	2.5882353	25	26	19	29
2017	Genclerbirligi	33	37	54	-17	14	1.4705882	0.4705882	1.9411765	18	14	19	40
2017	Antalyaspor	38	40	59	-19	17	1.4705882	0.7647059	2.2352941	25	23	15	36
2017	Akhisar Belediyespor	42	44	53	-9	19	1.4705882	1.0000000	2.4705882	20	24	24	29
2017	Ankaraspor	33	49	60	-11	17	1.3529412	0.5882353	1.9411765	26	24	23	36
2017	Alanyaspor	40	55	59	-4	18	1.2941176	1.0588235	2.3529412	30	28	25	31
2017	Karabukspor	12	20	86	-66	9	0.5882353	0.1176471	0.7058824	10	41	10	45
2016	Besiktas	77	73	30	43	38	2.5294118	2.0000000	4.5294118	44	15	29	15
2016	Buyuksehyr	73	63	28	35	39	2.4117647	1.8823529	4.2941176	39	15	24	13
2016	Karabukspor	43	38	48	-10	21	2.0000000	0.5294118	2.5294118	24	12	14	36
2016	Galatasaray	64	65	40	25	36	1.9411765	1.8235294	3.7647059	37	17	28	23
2016	Antalyaspor	58	47	40	7	25	1.8235294	1.5882353	3.4117647	20	16	27	24
2016	Fenerbahce	64	60	32	28	32	1.7647059	2.0000000	3.7647059	28	15	32	17
2016	Genclerbirligi	46	33	34	-1	22	1.7647059	0.9411765	2.7058824	19	9	14	25
2016	Akhisar Belediyespor	48	46	42	4	20	1.7058824	1.1176471	2.8235294	29	18	17	24
2016	Kasimpasa	43	46	49	-3	21	1.6470588	0.8823529	2.5294118	31	24	15	25
2016	Alanyaspor	40	54	65	-11	18	1.4705882	0.8823529	2.3529412	35	32	19	33
2016	Bursaspor	38	34	58	-24	27	1.4117647	0.8235294	2.2352941	19	22	15	36
2016	Trabzonspor	51	39	34	5	21	1.3529412	1.6470588	3.0000000	22	18	17	16
2016	Konyaspor	43	40	45	-5	24	1.3529412	1.1764706	2.5294118	20	21	20	24
2016	Rizespor	36	44	53	-9	16	1.2941176	0.8235294	2.1176471	24	23	20	30
2016	Kayserispor	38	47	58	-11	12	1.2352941	1.0000000	2.2352941	23	23	24	35
2016	Adanaspor	25	32	62	-30	11	0.8823529	0.5882353	1.4705882	19	32	13	30
2016	Ankaraspor	38	37	45	-8	26	0.8823529	1.3529412	2.2352941	15	24	22	21
2016	Gaziantepspor	26	30	65	-35	11	0.8235294	0.7058824	1.5294118	15	29	15	36
2015	Fenerbahce	74	60	27	33	40	2.6470588	1.7058824	4.3529412	32	10	28	17
2015	Besiktas	79	75	35	40	41	2.5294118	2.1176471	4.6470588	38	14	37	21
2015	Konyaspor	66	44	33	11	26	2.3529412	1.5294118	3.8823529	29	16	15	17
2015	Buyuksehyr	59	54	36	18	29	2.1176471	1.3529412	3.4705882	33	17	21	19
2015	Galatasaray	51	69	49	20	30	1.9411765	1.0588235	3.0000000	40	18	29	31
2015	Antalyaspor	45	53	52	1	21	1.9411765	0.7058824	2.6470588	36	20	17	32
2015	Genclerbirligi	45	42	42	0	13	1.7058824	0.9411765	2.6470588	23	14	19	28
2015	Kasimpasa	50	50	40	10	30	1.6470588	1.2941176	2.9411765	27	18	23	22
2015	Trabzonspor	40	40	59	-19	24	1.5882353	0.7647059	2.3529412	25	24	15	35
2015	Akhisar Belediyespor	46	42	41	1	29	1.5882353	1.1176471	2.7058824	18	16	24	25
2015	Rizespor	37	39	48	-9	24	1.5294118	0.6470588	2.1764706	27	19	12	29
2015	Bursaspor	44	47	55	-8	18	1.4705882	1.1176471	2.5882353	23	23	24	32
2015	Ankaraspor	52	52	36	16	19	1.4705882	1.5882353	3.0588235	28	21	24	15
2015	Sivasspor	31	34	48	-14	14	1.2352941	0.5882353	1.8235294	21	20	13	28
2015	Gaziantepspor	36	31	50	-19	23	1.1764706	0.9411765	2.1176471	16	22	15	28
2015	Eskisehirspor	30	39	64	-25	10	1.1764706	0.5882353	1.7647059	26	33	13	31
2015	Kayserispor	34	25	41	-16	19	1.0000000	1.0000000	2.0000000	12	16	13	25
2015	Mersin Idman Yurdu	21	31	71	-40	10	0.8823529	0.3529412	1.2352941	19	33	12	38
2014	Fenerbahce	74	60	29	31	39	2.4705882	1.8823529	4.3529412	30	14	30	15
2014	Galatasaray	77	60	35	25	38	2.4705882	2.0588235	4.5294118	32	17	28	18
2014	Trabzonspor	57	58	48	10	26	2.2941176	1.0588235	3.3529412	38	26	20	22
2014	Bursaspor	57	69	44	25	29	2.0588235	1.2941176	3.3529412	43	18	26	26
2014	Besiktas	69	55	32	23	38	1.8823529	2.1764706	4.0588235	30	19	25	13
2014	Buyuksehyr	59	49	30	19	28	1.8823529	1.5882353	3.4705882	31	15	18	15
2014	Konyaspor	46	30	39	-9	17	1.8235294	0.8823529	2.7058824	20	16	10	23
2014	Mersin Idman Yurdu	47	54	48	6	23	1.6470588	1.1176471	2.7647059	29	22	25	26
2014	Genclerbirligi	40	46	44	2	22	1.4117647	0.9411765	2.3529412	25	18	21	26
2014	Kasimpasa	37	56	73	-17	23	1.4117647	0.7647059	2.1764706	32	32	24	41
2014	Akhisar Belediyespor	38	41	51	-10	18	1.3529412	0.8823529	2.2352941	23	20	18	31
2014	Eskisehirspor	39	45	52	-7	17	1.2941176	1.0000000	2.2941176	22	23	23	29
2014	Karabukspor	28	44	64	-20	15	1.2941176	0.3529412	1.6470588	20	19	24	45
2014	Gaziantepspor	40	31	48	-17	24	1.2352941	1.1176471	2.3529412	15	24	16	24
2014	Sivasspor	36	43	50	-7	14	1.0588235	1.0588235	2.1176471	20	20	23	30
2014	Balikesirspor	27	48	69	-21	12	0.9411765	0.6470588	1.5882353	25	31	23	38
2014	Erciyesspor	27	43	62	-19	17	0.8823529	0.7058824	1.5882353	25	31	18	31
2014	Rizespor	36	41	55	-14	14	0.8235294	1.2941176	2.1176471	17	31	24	24
2013	Fenerbahce	74	74	33	41	41	2.6470588	1.7058824	4.3529412	46	11	28	22
2013	Galatasaray	65	59	32	27	33	2.4117647	1.4117647	3.8235294	36	16	23	16
2013	Sivasspor	53	60	55	5	29	2.2941176	0.8235294	3.1176471	35	21	25	34
2013	Besiktas	62	53	33	20	29	2.1176471	1.5294118	3.6470588	26	12	27	21
2013	Trabzonspor	53	53	41	12	27	2.0000000	1.1176471	3.1176471	28	19	25	22
2013	Akhisar Belediyespor	44	44	55	-11	25	1.8235294	0.7647059	2.5882353	30	21	14	34
2013	Bursaspor	46	40	46	-6	24	1.7647059	0.9411765	2.7058824	27	19	13	27
2013	Karabukspor	50	33	34	-1	27	1.7647059	1.1764706	2.9411765	18	12	15	22
2013	Konyaspor	42	48	45	3	20	1.7647059	0.7058824	2.4705882	29	15	19	30
2013	Genclerbirligi	45	39	43	-4	21	1.6470588	1.0000000	2.6470588	26	20	13	23
2013	Eskisehirspor	42	33	35	-2	27	1.5882353	0.8823529	2.4705882	21	15	12	20
2013	Rizespor	42	43	43	0	16	1.4705882	1.0000000	2.4705882	22	16	21	27
2013	Kasimpasa	51	56	39	17	29	1.4705882	1.5294118	3.0000000	33	25	23	14
2013	Gaziantepspor	37	38	58	-20	21	1.2941176	0.8823529	2.1764706	23	27	15	31
2013	Elazigspor	34	38	62	-24	13	1.2941176	0.7058824	2.0000000	21	19	17	43
2013	Erciyesspor	37	34	50	-16	12	1.2941176	0.8823529	2.1764706	18	27	16	23
2013	Kayserispor	29	30	58	-28	12	0.9411765	0.7647059	1.7058824	12	25	18	33
2013	Antalyaspor	31	34	47	-13	18	0.7647059	1.0588235	1.8235294	16	22	18	25
2012	Galatasaray	71	66	35	31	33	2.4117647	1.7647059	4.1764706	38	17	28	18
2012	Fenerbahce	61	56	39	17	27	2.2352941	1.3529412	3.5882353	35	18	21	21
2012	Antalyaspor	47	50	52	-2	30	2.0000000	0.7647059	2.7647059	37	28	13	24
2012	Kayserispor	52	48	45	3	19	1.8823529	1.1764706	3.0588235	25	14	23	31
2012	Sivasspor	44	42	46	-4	22	1.8823529	0.7058824	2.5882353	30	20	12	26
2012	Besiktas	58	63	49	14	30	1.8235294	1.5882353	3.4117647	36	22	27	27
2012	Bursaspor	55	52	41	11	24	1.8235294	1.4117647	3.2352941	24	12	28	29
2012	Trabzonspor	46	39	40	-1	24	1.8235294	0.8823529	2.7058824	23	17	16	23
2012	Eskisehirspor	46	48	40	8	24	1.5882353	1.1176471	2.7058824	28	20	20	20
2012	Gaziantepspor	46	42	49	-7	20	1.5294118	1.1764706	2.7058824	23	20	19	29
2012	Genclerbirligi	45	46	47	-1	21	1.5294118	1.1176471	2.6470588	26	21	20	26
2012	Kasimpasa	50	48	37	11	23	1.5294118	1.4117647	2.9411765	23	18	25	19
2012	Elazigspor	43	31	46	-15	16	1.4705882	1.0588235	2.5294118	14	17	17	29
2012	Karabukspor	40	41	53	-12	24	1.2941176	1.0588235	2.3529412	14	21	27	32
2012	Orduspor	29	35	51	-16	20	1.2941176	0.4117647	1.7058824	26	28	9	23
2012	Buyuksehyr	36	43	50	-7	21	1.2352941	0.8823529	2.1176471	24	24	19	26
2012	Akhisar Belediyespor	42	36	44	-8	15	1.1764706	1.2941176	2.4705882	16	21	20	23
2012	Mersin Idman Yurdu	22	31	53	-22	15	1.0000000	0.2941176	1.2941176	17	20	14	33
2011	Fenerbahce	68	61	34	27	35	2.6470588	1.3529412	4.0000000	39	12	22	22
2011	Galatasaray	77	69	24	45	37	2.4705882	2.0588235	4.5294118	38	14	31	10
2011	Karabukspor	44	44	56	-12	12	2.1176471	0.4705882	2.5882353	30	21	14	35
2011	Buyuksehyr	50	48	49	-1	24	2.0000000	0.9411765	2.9411765	31	15	17	34
2011	Besiktas	55	50	39	11	32	1.9411765	1.2941176	3.2352941	29	18	21	21
2011	Genclerbirligi	49	49	48	1	28	1.9411765	0.9411765	2.8823529	32	16	17	32
2011	Trabzonspor	56	60	40	20	24	1.8823529	1.4117647	3.2941176	36	23	24	17
2011	Gaziantepspor	48	40	33	7	16	1.7647059	1.0588235	2.8235294	24	13	16	20
2011	Bursaspor	49	44	35	9	19	1.6470588	1.2352941	2.8823529	20	12	24	23
2011	Eskisehirspor	50	42	41	1	30	1.6470588	1.2941176	2.9411765	18	16	24	25
2011	Kayserispor	44	42	39	3	25	1.6470588	0.9411765	2.5882353	28	19	14	20
2011	Sivasspor	50	57	54	3	24	1.6470588	1.2941176	2.9411765	25	20	32	34
2011	Orduspor	42	28	34	-6	17	1.6470588	0.8235294	2.4705882	17	13	11	21
2011	Antalyaspor	39	32	42	-10	21	1.5882353	0.7058824	2.2941176	19	18	13	24
2011	Samsunspor	36	36	47	-11	12	1.3529412	0.7647059	2.1176471	24	24	12	23
2011	Manisaspor	32	31	52	-21	24	1.0588235	0.8235294	1.8823529	16	27	15	25
2011	Mersin Idman Yurdu	42	34	45	-11	27	1.0588235	1.4117647	2.4705882	15	24	19	21
2011	Ankaragucu	11	22	77	-55	7	0.3529412	0.2941176	0.6470588	7	36	15	41
2010	Fenerbahce	82	84	34	50	33	2.6470588	2.1764706	4.8235294	41	8	43	26
2010	Trabzonspor	82	69	23	46	42	2.3529412	2.4705882	4.8235294	34	12	35	11
2010	Gaziantepspor	59	44	33	11	24	2.0588235	1.4117647	3.4705882	26	16	18	17
2010	Bursaspor	61	50	29	21	37	1.8235294	1.7647059	3.5882353	22	20	28	9
2010	Kayserispor	51	46	44	2	32	1.8235294	1.1764706	3.0000000	25	17	21	27
2010	Besiktas	54	53	36	17	28	1.7058824	1.4705882	3.1764706	35	24	18	12
2010	Eskisehirspor	47	41	40	1	22	1.7058824	1.0588235	2.7647059	18	12	23	28
2010	Karabukspor	44	46	53	-7	24	1.7058824	0.8823529	2.5882353	28	24	18	29
2010	Galatasaray	46	41	46	-5	23	1.5294118	1.1764706	2.7058824	22	21	19	25
2010	Sivasspor	35	43	57	-14	15	1.4705882	0.5882353	2.0588235	26	24	17	33
2010	Buyuksehyr	42	40	45	-5	23	1.4117647	1.0588235	2.4705882	18	21	22	24
2010	Ankaragucu	41	52	62	-10	21	1.3529412	1.0588235	2.4117647	30	32	22	30
2010	Antalyaspor	42	41	48	-7	23	1.2941176	1.1764706	2.4705882	22	22	19	26
2010	Manisaspor	43	49	52	-3	22	1.2941176	1.2352941	2.5294118	24	27	25	25
2010	Bucaspor	26	37	65	-28	12	1.2941176	0.2352941	1.5294118	23	26	14	39
2010	Genclerbirligi	40	43	51	-8	17	1.2352941	1.1176471	2.3529412	24	28	19	23
2010	Konyaspor	24	28	49	-21	14	0.8823529	0.5294118	1.4117647	13	21	15	28
2010	Kasimpasa	23	31	71	-40	8	0.7058824	0.6470588	1.3529412	15	37	16	34
2009	Bursaspor	69	59	26	33	32	2.5000000	1.8125000	4.3125000	34	9	25	17
2009	Fenerbahce	68	55	28	27	34	2.3750000	1.8750000	4.2500000	30	13	25	15
2009	Galatasaray	58	55	35	20	33	2.1250000	1.5000000	3.6250000	34	13	21	22
2009	Eskisehirspor	49	38	34	4	22	2.1250000	0.9375000	3.0625000	21	11	17	23
2009	Trabzonspor	51	47	32	15	24	2.0625000	1.1250000	3.1875000	26	12	21	20
2009	Besiktas	58	41	25	16	29	2.0000000	1.6250000	3.6250000	25	11	16	14
2009	Buyuksehyr	50	41	44	-3	23	1.7500000	1.3750000	3.1250000	21	20	20	24
2009	Antalyaspor	43	43	38	5	21	1.6875000	1.0000000	2.6875000	26	15	17	23
2009	Ankaragucu	35	33	40	-7	14	1.4375000	0.7500000	2.1875000	21	16	12	24
2009	Kasimpasa	35	44	53	-9	17	1.4375000	0.7500000	2.1875000	26	25	18	28
2009	Genclerbirligi	41	32	35	-3	23	1.3750000	1.1875000	2.5625000	15	14	17	21
2009	Kayserispor	45	39	37	2	31	1.3750000	1.4375000	2.8125000	22	14	17	23
2009	Gaziantepspor	34	32	39	-7	21	1.3125000	0.8125000	2.1250000	20	20	12	19
2009	Manisaspor	31	21	34	-13	15	1.1875000	0.7500000	1.9375000	12	15	9	19
2009	Sivasspor	28	36	59	-23	14	1.1250000	0.6250000	1.7500000	20	26	16	33
2009	Denizlispor	20	24	49	-25	4	1.0000000	0.2500000	1.2500000	14	17	10	32
2009	Diyarbakirspor	21	22	54	-32	15	0.6250000	0.6875000	1.3125000	13	31	9	23
2008	Ankaraspor	63	60	105	-45	42	1.2352941	0.6176471	1.8529412	41	46	19	59
2008	Sivasspor	66	54	28	26	37	2.4705882	1.4117647	3.8823529	32	10	22	18
2008	Besiktas	71	60	30	30	31	2.2941176	1.8823529	4.1764706	29	12	31	18
2008	Fenerbahce	61	60	36	24	33	2.2941176	1.2941176	3.5882353	42	17	18	19
2008	Galatasaray	61	57	39	18	33	2.1764706	1.4117647	3.5882353	35	18	22	21
2008	Bursaspor	58	47	36	11	25	1.9411765	1.4705882	3.4117647	24	11	23	25
2008	Trabzonspor	65	54	34	20	35	1.8823529	1.9411765	3.8235294	23	14	31	20
2008	Denizlispor	38	39	52	-13	15	1.7647059	0.4705882	2.2352941	25	21	14	31
2008	Kayserispor	50	38	26	12	27	1.7647059	1.1764706	2.9411765	17	9	21	17
2008	Gaziantepspor	47	46	48	-2	26	1.7058824	1.0588235	2.7647059	24	19	22	29
2008	Eskisehirspor	40	45	49	-4	19	1.5882353	0.7647059	2.3529412	30	24	15	25
2008	Antalyaspor	40	34	42	-8	16	1.5294118	0.8235294	2.3529412	21	20	13	22
2008	Buyuksehyr	42	37	46	-9	19	1.4117647	1.0588235	2.4705882	20	19	17	27
2008	Genclerbirligi	38	38	50	-12	17	1.2941176	0.9411765	2.2352941	18	21	20	29
2008	Ankaragucu	39	36	47	-11	15	1.2352941	1.0588235	2.2941176	20	23	16	24
2008	Konyaspor	38	35	46	-11	17	1.2352941	1.0000000	2.2352941	22	18	13	28
2008	Kocaelispor	29	47	73	-26	12	1.1176471	0.5882353	1.7058824	28	34	19	39
2007	Fenerbahce	73	72	37	35	37	2.5882353	1.7058824	4.2941176	42	18	30	19
2007	Galatasaray	79	64	23	41	36	2.4705882	2.1764706	4.6470588	35	10	29	13
2007	Sivasspor	73	57	29	28	37	2.3529412	1.9411765	4.2941176	33	17	24	12
2007	Besiktas	73	58	32	26	34	2.1176471	2.1764706	4.2941176	33	15	25	17
2007	Kayserispor	55	50	31	19	26	2.1176471	1.1176471	3.2352941	33	13	17	18
2007	Trabzonspor	49	44	39	5	22	1.9411765	0.9411765	2.8823529	28	19	16	20
2007	Gaziantepspor	43	36	45	-9	21	1.7647059	0.7647059	2.5294118	21	19	15	26
2007	Denizlispor	45	48	48	0	24	1.7058824	0.9411765	2.6470588	28	20	20	28
2007	Konyaspor	36	37	64	-27	25	1.6470588	0.4705882	2.1176471	25	23	12	41
2007	Ankaragucu	43	36	44	-8	23	1.5882353	0.9411765	2.5294118	19	21	17	23
2007	Buyuksehyr	38	44	47	-3	20	1.5294118	0.7058824	2.2352941	23	18	21	29
2007	Bursaspor	38	31	40	-9	19	1.4705882	0.7647059	2.2352941	16	14	15	26
2007	Ankaraspor	41	35	38	-3	13	1.4705882	0.9411765	2.4117647	17	14	18	24
2007	Genclerbirligi	35	44	51	-7	14	1.2941176	0.7647059	2.0588235	27	25	17	26
2007	Manisaspor	29	42	62	-20	17	1.2352941	0.4705882	1.7058824	21	22	21	40
2007	Rizespor	29	32	64	-32	21	1.1176471	0.5882353	1.7058824	19	28	13	36
2007	Oftasspor	40	30	36	-6	20	1.0588235	1.2941176	2.3529412	14	18	16	18
2007	Kasimpasa	29	26	56	-30	9	0.9411765	0.7647059	1.7058824	14	24	12	32
2006	Besiktas	61	43	32	11	29	2.3529412	1.2352941	3.5882353	27	13	16	19
2006	Fenerbahce	70	65	31	34	37	2.2352941	1.8823529	4.1176471	39	16	26	15
2006	Galatasaray	56	58	37	21	30	2.0588235	1.2352941	3.2941176	36	15	22	22
2006	Trabzonspor	52	54	44	10	19	2.0000000	1.0588235	3.0588235	32	16	22	28
2006	Rizespor	40	34	40	-6	18	2.0000000	0.3529412	2.3529412	27	16	7	24
2006	Kayserispor	51	54	43	11	26	2.0000000	1.0000000	3.0000000	28	16	26	27
2006	Bursaspor	45	36	42	-6	24	1.7647059	0.8823529	2.6470588	19	13	17	29
2006	Konyaspor	45	42	44	-2	24	1.7647059	0.8823529	2.6470588	25	15	17	29
2006	Ankaraspor	47	43	38	5	23	1.7647059	1.0000000	2.7647059	24	16	19	22
2006	Denizlispor	41	33	40	-7	19	1.5882353	0.8235294	2.4117647	19	16	14	24
2006	Manisaspor	42	41	45	-4	28	1.5882353	0.8823529	2.4705882	26	21	15	24
2006	Gaziantepspor	43	31	39	-8	20	1.5294118	1.0000000	2.5294118	14	13	17	26
2006	Genclerbirligi	48	43	42	1	27	1.5294118	1.2941176	2.8235294	22	23	21	19
2006	Antalyaspor	39	32	36	-4	17	1.5294118	0.7647059	2.2941176	20	18	12	18
2006	Sivasspor	48	41	44	-3	22	1.5294118	1.2941176	2.8235294	21	23	20	21
2006	Ankaragucu	42	32	39	-7	22	1.3529412	1.1176471	2.4705882	18	19	14	20
2006	Erciyesspor	37	29	49	-20	11	1.2352941	0.9411765	2.1764706	14	17	15	32
2006	Sakaryaspor	22	25	51	-26	15	0.8235294	0.4705882	1.2941176	15	24	10	27
2005	Galatasaray	83	82	34	48	41	2.7058824	2.1764706	4.8823529	52	16	30	18
2005	Fenerbahce	81	90	34	56	45	2.5294118	2.2352941	4.7647059	49	16	41	18
2005	Kayserispor	51	59	42	17	29	1.8823529	1.1176471	3.0000000	38	22	21	20
2005	Genclerbirligi	51	47	39	8	25	1.8235294	1.1764706	3.0000000	28	18	19	21
2005	Konyaspor	46	39	43	-4	22	1.7647059	0.9411765	2.7058824	26	19	13	24
2005	Trabzonspor	52	51	42	9	23	1.6470588	1.4117647	3.0588235	27	18	24	24
2005	Sivasspor	43	34	44	-10	25	1.5294118	1.0000000	2.5294118	24	24	10	20
2005	Rizespor	41	35	44	-9	15	1.4117647	1.0000000	2.4117647	19	21	16	23
2005	Manisaspor	40	52	61	-9	20	1.4117647	0.9411765	2.3529412	27	29	25	32
2005	Ankaragucu	39	43	48	-5	19	1.2941176	1.0000000	2.2941176	24	22	19	26
2005	Besiktas	54	52	39	13	25	1.2941176	1.8823529	3.1764706	24	20	28	19
2005	Denizlispor	37	41	50	-9	13	1.2352941	0.9411765	2.1764706	22	19	19	31
2005	Malatyaspor	36	34	50	-16	17	1.2352941	0.8823529	2.1176471	16	22	18	28
2005	Erciyesspor	40	36	47	-11	23	1.2352941	1.1176471	2.3529412	14	17	22	30
2005	Gaziantepspor	40	34	50	-16	21	1.1764706	1.1764706	2.3529412	19	22	15	28
2005	Ankaraspor	39	44	51	-7	17	1.1176471	1.1764706	2.2941176	23	24	21	27
2005	Samsunspor	36	45	62	-17	14	1.0000000	1.1176471	2.1176471	18	25	27	37
2005	Diyarbakirspor	29	31	69	-38	18	1.0000000	0.7058824	1.7058824	15	30	16	39
2004	Fenerbahce	80	77	24	53	43	2.8235294	1.8823529	4.7058824	51	9	26	15
2004	Galatasaray	76	64	25	39	39	2.5294118	1.9411765	4.4705882	40	14	24	11
2004	Besiktas	69	70	39	31	29	2.2941176	1.7647059	4.0588235	38	17	32	22
2004	Trabzonspor	77	73	29	44	37	2.2941176	2.2352941	4.5294118	38	16	35	13
2004	Denizlispor	49	46	45	1	30	2.1176471	0.7647059	2.8823529	32	13	14	32
2004	Gaziantepspor	44	49	55	-6	24	1.8235294	0.7647059	2.5882353	28	21	21	34
2004	Konyaspor	45	62	62	0	20	1.7647059	0.8823529	2.6470588	34	24	28	38
2004	Genclerbirligi	51	52	41	11	21	1.7058824	1.2941176	3.0000000	25	18	27	23
2004	Ankaraspor	48	52	48	4	19	1.7058824	1.1176471	2.8235294	27	23	25	25
2004	Diyarbakirspor	34	31	53	-22	19	1.5882353	0.4117647	2.0000000	20	15	11	38
2004	Rizespor	43	36	37	-1	29	1.5294118	1.0000000	2.5294118	23	18	13	19
2004	Sakaryaspor	32	51	72	-21	16	1.4117647	0.4705882	1.8823529	34	34	17	38
2004	Malatyaspor	43	47	53	-6	25	1.4117647	1.1176471	2.5294118	27	23	20	30
2004	Kayserispor	34	42	65	-23	11	1.4117647	0.5882353	2.0000000	23	22	19	43
2004	Ankaragucu	38	37	61	-24	19	1.3529412	0.8823529	2.2352941	23	28	14	33
2004	Samsunspor	38	40	55	-15	20	1.2352941	1.0000000	2.2352941	23	23	17	32
2004	A. Sebatspor	19	40	78	-38	9	0.9411765	0.1764706	1.1176471	20	30	20	48
2004	Buyuksehyr	27	32	59	-27	15	0.8823529	0.7058824	1.5882353	16	31	16	28
2003	Fenerbahce	76	82	41	41	35	2.2941176	2.1764706	4.4705882	47	23	35	18
2003	Trabzonspor	69	57	39	18	31	2.0588235	2.0000000	4.0588235	28	16	29	23
2003	Galatasaray	54	56	47	9	29	2.0000000	1.1764706	3.1764706	35	25	21	22
2003	Besiktas	62	66	45	21	43	1.9411765	1.7058824	3.6470588	38	24	28	21
2003	Samsunspor	46	46	48	-2	23	1.9411765	0.7647059	2.7058824	30	22	16	26
2003	Gaziantepspor	57	52	51	1	26	1.8235294	1.5294118	3.3529412	30	26	22	25
2003	Rizespor	45	38	50	-12	18	1.8235294	0.8235294	2.6470588	22	18	16	32
2003	Ankaragucu	45	48	53	-5	19	1.6470588	1.0000000	2.6470588	27	23	21	30
2003	Bursaspor	40	40	40	0	13	1.6470588	0.7058824	2.3529412	28	15	12	25
2003	Malatyaspor	45	51	40	11	27	1.6470588	1.0000000	2.6470588	30	16	21	24
2003	Genclerbirligi	44	56	52	4	26	1.5882353	1.0000000	2.5882353	34	23	22	29
2003	Denizlispor	55	52	43	9	30	1.5294118	1.7058824	3.2352941	25	20	27	23
2003	Diyarbakirspor	43	44	54	-10	25	1.5294118	1.0000000	2.5294118	24	20	20	34
2003	Konyaspor	44	53	54	-1	18	1.5294118	1.0588235	2.5882353	29	24	24	30
2003	A. Sebatspor	42	45	53	-8	14	1.2941176	1.1764706	2.4705882	21	25	24	28
2003	Buyuksehyr	41	46	45	1	21	1.2352941	1.1764706	2.4117647	23	22	23	23
2003	Elazigspor	22	37	79	-42	11	0.8823529	0.4117647	1.2941176	18	28	19	51
2003	Adanaspor	22	38	73	-35	11	0.7058824	0.5882353	1.2941176	19	29	19	44
2002	Besiktas	85	63	21	42	41	2.6470588	2.3529412	5.0000000	34	7	29	14
2002	Galatasaray	77	61	27	34	36	2.4117647	2.1176471	4.5294118	36	10	25	17
2002	Gaziantepspor	57	61	41	20	30	2.2352941	1.1176471	3.3529412	39	19	22	22
2002	Genclerbirligi	66	76	40	36	34	2.1176471	1.7647059	3.8823529	31	13	45	27
2002	Fenerbahce	51	55	42	13	32	2.0588235	0.9411765	3.0000000	36	14	19	28
2002	Ankaragucu	49	44	42	2	23	2.0000000	0.8823529	2.8823529	31	14	13	28
2002	Malatyaspor	52	56	45	11	25	2.0000000	1.0588235	3.0588235	39	22	17	23
2002	Bursaspor	36	42	62	-20	16	1.8235294	0.2941176	2.1176471	30	22	12	40
2002	Trabzonspor	51	44	33	11	30	1.6470588	1.3529412	3.0000000	21	10	23	23
2002	Diyarbakirspor	36	34	47	-13	19	1.5882353	0.5294118	2.1176471	24	15	10	32
2002	Elazigspor	37	40	59	-19	15	1.5882353	0.5882353	2.1764706	21	19	19	40
2002	Denizlispor	40	37	42	-5	18	1.5294118	0.8235294	2.3529412	22	19	15	23
2002	Buyuksehyr	43	42	47	-5	19	1.4705882	1.0588235	2.5294118	21	20	21	27
2002	Altay	35	48	69	-21	17	1.2941176	0.7647059	2.0588235	35	34	13	35
2002	Samsunspor	39	42	59	-17	16	1.2352941	1.0588235	2.2941176	23	32	19	27
2002	Adanaspor	40	44	54	-10	19	1.1764706	1.1764706	2.3529412	20	27	24	27
2002	Goztep	26	32	57	-25	15	0.8823529	0.6470588	1.5294118	17	25	15	32
2002	Kocaelispor	22	32	66	-34	13	0.7058824	0.5882353	1.2941176	19	32	13	34
2001	Galatasaray	78	75	31	44	39	3.0000000	1.5882353	4.5882353	48	9	27	22
2001	Fenerbahce	75	70	31	39	34	2.7058824	1.7058824	4.4117647	42	12	28	19
2001	Denizlispor	48	65	52	13	18	2.0000000	0.8235294	2.8235294	45	23	20	29
2001	Ankaragucu	53	72	58	14	27	1.8823529	1.2352941	3.1176471	39	24	33	34
2001	Malatyaspor	40	34	50	-16	12	1.8823529	0.4705882	2.3529412	25	20	9	30
2001	Kocaelispor	43	45	60	-15	25	1.7647059	0.7647059	2.5294118	29	22	16	38
2001	Goztep	45	38	56	-18	20	1.7058824	0.9411765	2.6470588	25	25	13	31
2001	Besiktas	62	69	39	30	36	1.6470588	2.0000000	3.6470588	30	21	39	18
2001	Bursaspor	44	48	60	-12	26	1.6470588	0.9411765	2.5882353	26	19	22	41
2001	Gaziantepspor	48	57	52	5	28	1.6470588	1.1764706	2.8235294	34	23	23	29
2001	Trabzonspor	40	49	60	-11	25	1.6470588	0.7058824	2.3529412	26	20	23	40
2001	Antalyaspor	37	46	61	-15	17	1.6470588	0.5294118	2.1764706	30	28	16	33
2001	Diyarbakirspor	40	41	50	-9	21	1.5882353	0.7647059	2.3529412	24	17	17	33
2001	Buyuksehyr	44	33	38	-5	30	1.5882353	1.0000000	2.5882353	20	13	13	25
2001	Rizespor	37	43	51	-8	19	1.4705882	0.7058824	2.1764706	23	21	20	30
2001	Samsunspor	38	32	43	-11	18	1.3529412	0.8823529	2.2352941	20	18	12	25
2001	Genclerbirligi	45	47	51	-4	15	1.2941176	1.3529412	2.6470588	27	26	20	25
2001	Yozgatspor	27	46	67	-21	16	1.2352941	0.3529412	1.5882353	29	27	17	40
2000	Fenerbahce	76	82	39	43	36	3.0000000	1.4705882	4.4705882	55	17	27	22
2000	Besiktas	64	68	48	20	36	2.4117647	1.3529412	3.7647059	41	18	27	30
2000	Gaziantepspor	68	67	40	27	32	2.3529412	1.6470588	4.0000000	36	11	31	29
2000	Rizespor	46	45	43	2	16	2.2352941	0.4705882	2.7058824	36	19	9	24
2000	Trabzonspor	58	69	52	17	29	2.1764706	1.2352941	3.4117647	35	18	34	34
2000	Galatasaray	73	77	35	42	39	2.0588235	2.2352941	4.2941176	40	14	37	21
2000	Kocaelispor	44	57	57	0	13	1.8823529	0.7058824	2.5882353	35	24	22	33
2000	Ankaragucu	56	65	59	6	22	1.8235294	1.4705882	3.2941176	39	24	26	35
2000	Yozgatspor	49	55	46	9	23	1.7647059	1.1176471	2.8823529	30	15	25	31
2000	Denizlispor	45	53	56	-3	21	1.7058824	0.9411765	2.6470588	27	20	26	36
2000	Genclerbirligi	46	44	53	-9	30	1.7058824	1.0000000	2.7058824	25	21	19	32
2000	Bursaspor	40	55	60	-5	15	1.5882353	0.7647059	2.3529412	36	30	19	30
2000	Samsunspor	45	52	53	-1	25	1.3529412	1.2941176	2.6470588	32	29	20	24
2000	Antalyaspor	36	45	64	-19	23	1.3529412	0.7647059	2.1176471	31	29	14	35
2000	Buyuksehyr	44	47	58	-11	25	1.1764706	1.4117647	2.5882353	20	33	27	25
2000	Erzurumspor	21	36	80	-44	12	0.8823529	0.3529412	1.2352941	21	26	15	54
2000	Adanaspor	16	51	91	-40	13	0.6470588	0.2941176	0.9411765	27	42	24	49
2000	Siirt Jet-PA	24	47	81	-34	6	0.6470588	0.7647059	1.4117647	22	37	25	44
1999	Galatasaray	79	77	23	54	42	2.4117647	2.2352941	4.6470588	49	10	28	13
1999	Besiktas	75	74	27	47	31	2.2941176	2.1176471	4.4117647	38	11	36	16
1999	Trabzonspor	53	47	41	6	25	1.9411765	1.1764706	3.1176471	28	15	19	26
1999	Denizlispor	47	55	57	-2	27	1.8823529	0.8823529	2.7647059	32	23	23	34
1999	Gaziantepspor	62	49	27	22	30	1.8823529	1.7647059	3.6470588	32	15	17	12
1999	Samsunspor	52	51	43	8	21	1.8823529	1.1764706	3.0588235	31	15	20	28
1999	Fenerbahce	61	59	44	15	29	1.8235294	1.7647059	3.5882353	27	20	32	24
1999	Kocaelispor	40	44	58	-14	12	1.8235294	0.5294118	2.3529412	30	18	14	40
1999	Bursaspor	42	51	63	-12	16	1.7058824	0.7647059	2.4705882	34	28	17	35
1999	Genclerbirligi	56	57	47	10	23	1.7058824	1.5882353	3.2941176	27	17	30	30
1999	Altay	37	34	43	-9	25	1.6470588	0.5294118	2.1764706	22	16	12	27
1999	Erzurumspor	38	40	61	-21	19	1.6470588	0.5882353	2.2352941	26	19	14	42
1999	Buyuksehyr	37	38	43	-5	19	1.5882353	0.5882353	2.1764706	26	21	12	22
1999	Adanaspor	45	51	55	-4	25	1.5294118	1.1176471	2.6470588	29	23	22	32
1999	Ankaragucu	39	45	56	-11	22	1.4117647	0.8823529	2.2941176	23	21	22	35
1999	Antalyaspor	41	42	58	-16	24	1.2352941	1.1764706	2.4117647	24	24	18	34
1999	Goztep	26	26	54	-28	17	0.8823529	0.6470588	1.5294118	17	26	9	28
1999	Vanspor	18	38	78	-40	10	0.7647059	0.2941176	1.0588235	24	37	14	41
1998	Fenerbahce	72	84	29	55	38	2.5882353	1.6470588	4.2352941	54	13	30	16
1998	Galatasaray	78	85	30	55	37	2.2941176	2.2941176	4.5882353	45	18	40	12
1998	Besiktas	77	58	27	31	38	2.0000000	2.5294118	4.5294118	29	16	29	11
1998	Gaziantepspor	48	51	48	3	23	1.9411765	0.8823529	2.8235294	33	18	18	30
1998	Trabzonspor	58	48	37	11	36	1.8235294	1.5882353	3.4117647	24	19	24	18
1998	Adanaspor	38	37	53	-16	17	1.8235294	0.4117647	2.2352941	27	16	10	37
1998	Altay	40	46	59	-13	18	1.7647059	0.5882353	2.3529412	30	24	16	35
1998	Bursaspor	39	51	69	-18	24	1.7058824	0.5882353	2.2941176	30	22	21	47
1998	Erzurumspor	39	40	64	-24	17	1.7058824	0.5882353	2.2941176	25	22	15	42
1998	Antalyaspor	49	46	47	-1	30	1.6470588	1.2352941	2.8823529	26	22	20	25
1998	Kocaelispor	50	44	37	7	28	1.5882353	1.3529412	2.9411765	21	16	23	21
1998	Sakaryaspor	35	44	52	-8	10	1.5882353	0.4705882	2.0588235	32	17	12	35
1998	Dardanelspor	32	35	49	-14	10	1.4705882	0.4117647	1.8823529	25	19	10	30
1998	Ankaragucu	38	45	55	-10	20	1.4117647	0.8235294	2.2352941	28	21	17	34
1998	Genclerbirligi	46	49	47	2	26	1.4117647	1.2941176	2.7058824	26	22	23	25
1998	Samsunspor	41	38	53	-15	21	1.2941176	1.1176471	2.4117647	19	25	19	28
1998	Buyuksehyr	43	48	55	-7	25	1.2941176	1.2352941	2.5294118	26	21	22	34
1998	Karabukspor	23	26	64	-38	8	1.0000000	0.3529412	1.3529412	15	29	11	35
1997	Galatasaray	75	86	43	43	33	2.7647059	1.6470588	4.4117647	52	16	34	27
1997	Fenerbahce	71	59	25	34	39	2.4117647	1.7647059	4.1764706	37	10	22	15
1997	Trabzonspor	66	68	42	26	36	2.0000000	1.8823529	3.8823529	36	20	32	22
1997	Kocaelispor	43	46	46	0	23	1.9411765	0.5882353	2.5294118	36	20	10	26
1997	Besiktas	48	56	41	15	30	1.8235294	1.0000000	2.8235294	27	14	29	27
1997	Bursaspor	45	46	50	-4	28	1.7647059	0.8823529	2.6470588	31	22	15	28
1997	Karabukspor	44	34	50	-16	24	1.7647059	0.8235294	2.5882353	21	16	13	34
1997	Ankaragucu	41	40	47	-7	20	1.7058824	0.7058824	2.4117647	27	23	13	24
1997	Buyuksehyr	54	60	42	18	30	1.7058824	1.4705882	3.1764706	39	26	21	16
1997	Samsunspor	49	42	42	0	25	1.6470588	1.2352941	2.8823529	23	15	19	27
1997	Dardanelspor	41	37	40	-3	24	1.6470588	0.7647059	2.4117647	24	13	13	27
1997	Gaziantepspor	38	39	42	-3	17	1.5294118	0.7058824	2.2352941	28	20	11	22
1997	Genclerbirligi	38	42	46	-4	18	1.5294118	0.7058824	2.2352941	24	16	18	30
1997	Antalyaspor	41	51	55	-4	14	1.5294118	0.8823529	2.4117647	28	22	23	33
1997	Sekerspor	36	41	67	-26	17	1.5294118	0.5882353	2.1176471	22	23	19	44
1997	Altay	47	45	52	-7	16	1.4705882	1.2941176	2.7647059	27	26	18	26
1997	Kayserispor	38	42	60	-18	19	1.4705882	0.7647059	2.2352941	23	20	19	40
1997	Vanspor	24	26	70	-44	5	1.0588235	0.3529412	1.4117647	11	22	15	48
1996	Besiktas	74	88	26	62	37	2.6470588	1.7058824	4.3529412	49	7	39	19
1996	Fenerbahce	73	79	25	54	39	2.5882353	1.7058824	4.2941176	47	7	32	18
1996	Trabzonspor	72	72	33	39	38	2.4705882	1.7647059	4.2352941	43	14	29	19
1996	Galatasaray	82	90	30	60	44	2.3529412	2.4705882	4.8235294	45	15	45	15
1996	Gaziantepspor	47	38	50	-12	32	2.1176471	0.6470588	2.7647059	23	13	15	37
1996	Bursaspor	59	55	37	18	30	1.9411765	1.5294118	3.4705882	33	17	22	20
1996	Samsunspor	45	49	52	-3	22	1.8235294	0.8235294	2.6470588	27	17	22	35
1996	Antalyaspor	45	38	49	-11	17	1.8235294	0.8235294	2.6470588	21	21	17	28
1996	Buyuksehyr	55	56	43	13	22	1.8235294	1.4117647	3.2352941	39	22	17	21
1996	Kocaelispor	48	37	34	3	27	1.7058824	1.1176471	2.8235294	22	17	15	17
1996	Vanspor	37	31	50	-19	12	1.6470588	0.5294118	2.1764706	20	13	11	37
1996	Dardanelspor	36	35	65	-30	13	1.6470588	0.4705882	2.1176471	25	25	10	40
1996	Sariyer	34	41	54	-13	21	1.6470588	0.3529412	2.0000000	28	24	13	30
1996	Altay	37	30	60	-30	19	1.5882353	0.5882353	2.1764706	23	29	7	31
1996	Genclerbirligi	39	36	49	-13	21	1.5882353	0.7058824	2.2941176	22	23	14	26
1996	Ankaragucu	38	39	52	-13	20	1.2941176	0.9411765	2.2352941	15	20	24	32
1996	Denizlispor	20	36	80	-44	11	0.7647059	0.4117647	1.1764706	22	37	14	43
1996	Zeytinburnu	11	25	86	-61	5	0.4705882	0.1764706	0.6470588	12	38	13	48
1995	Fenerbahce	84	68	19	49	42	2.6470588	2.2941176	4.9411765	41	7	27	12
1995	Trabzonspor	82	79	24	55	44	2.4117647	2.4117647	4.8235294	39	10	40	14
1995	Besiktas	69	74	46	28	36	2.1764706	1.8823529	4.0588235	48	26	26	20
1995	Galatasaray	68	66	38	28	35	2.1764706	1.8235294	4.0000000	35	14	31	24
1995	Gaziantepspor	49	42	43	-1	24	2.1764706	0.7058824	2.8823529	29	15	13	28
1995	Kocaelispor	59	61	43	18	25	2.0588235	1.4117647	3.4705882	33	16	28	27
1995	Samsunspor	43	46	46	0	20	1.8235294	0.7058824	2.5294118	32	20	14	26
1995	Antalyaspor	45	45	55	-10	25	1.7647059	0.8823529	2.6470588	25	19	20	36
1995	Ankaragucu	37	36	56	-20	21	1.7058824	0.4705882	2.1764706	24	15	12	41
1995	Vanspor	35	32	50	-18	13	1.5882353	0.4705882	2.0588235	22	17	10	33
1995	Bursaspor	41	56	48	8	21	1.5294118	0.8823529	2.4117647	37	21	19	27
1995	Genclerbirligi	41	41	48	-7	25	1.5294118	0.8823529	2.4117647	28	22	13	26
1995	Altay	36	35	56	-21	20	1.2941176	0.8235294	2.1176471	21	25	14	31
1995	Kayserispor	32	41	60	-19	12	1.2352941	0.6470588	1.8823529	24	20	17	40
1995	Eskisehirspor	32	40	68	-28	13	1.1176471	0.7647059	1.8823529	23	26	17	42
1995	Karsiyaka	27	26	65	-39	18	1.0588235	0.5294118	1.5882353	16	29	10	36
1995	Denizlispor	34	38	50	-12	16	1.0000000	1.0000000	2.0000000	18	24	20	26
1995	Buyuksehyr	35	46	57	-11	13	0.8823529	1.1764706	2.0588235	21	30	25	27
1994	Besiktas	79	80	26	54	39	2.5294118	2.1176471	4.6470588	45	11	35	15
1994	Fenerbahce	67	78	35	43	31	2.4705882	1.4705882	3.9411765	51	14	27	21
1994	Trabzonspor	76	80	28	52	39	2.4705882	2.0000000	4.4705882	48	10	32	18
1994	Gaziantepspor	48	50	50	0	17	2.2941176	0.5294118	2.8235294	32	13	18	37
1994	Galatasaray	69	76	38	38	39	2.2352941	1.8235294	4.0588235	38	15	38	23
1994	Kocaelispor	44	57	60	-3	22	2.2352941	0.3529412	2.5882353	42	19	15	41
1994	Genclerbirligi	59	60	45	15	29	2.1764706	1.2941176	3.4705882	33	17	27	28
1994	Bursaspor	51	47	39	8	30	2.0588235	0.9411765	3.0000000	31	16	16	23
1994	Vanspor	39	38	50	-12	22	1.8235294	0.4705882	2.2941176	27	18	11	32
1994	Kayserispor	42	62	70	-8	21	1.8235294	0.6470588	2.4705882	41	27	21	43
1994	Altay	44	44	57	-13	19	1.7058824	0.8823529	2.5882353	28	29	16	28
1994	Ankaragucu	38	39	57	-18	21	1.7058824	0.5294118	2.2352941	23	20	16	37
1994	Samsunspor	45	54	60	-6	21	1.7058824	0.9411765	2.6470588	37	24	17	36
1994	Denizlispor	35	42	55	-13	19	1.5882353	0.4705882	2.0588235	25	16	17	39
1994	Antalyaspor	38	39	46	-7	16	1.5882353	0.6470588	2.2352941	21	18	18	28
1994	Zeytinburnu	30	35	74	-39	15	1.3529412	0.4117647	1.7647059	24	34	11	40
1994	P. Ofisi	29	38	73	-35	14	1.2352941	0.4705882	1.7058824	20	28	18	45
1994	Ad. Demirspor	15	25	81	-56	12	0.7647059	0.1176471	0.8823529	16	33	9	48

C.Analyses

1. Champions Analyses

1.1. Team Participation Over 25 Years

We see that only 4 teams have never relegated to lower division. (Galatasaray, Fenerbahce, Besiktas and Trabzonspor)
After these teams the most consistent teams are Genclerbirligi, Gaziantep and Bursaspor
There are 9 teams that can participate only one year

  team_participation <- season_statistics %>% group_by(team) %>% count(team) %>% 
  select(team, n)%>%arrange(desc(n))

ggplot(team_participation,aes(reorder(team,n),n,fill="red"))+
  geom_bar(stat="identity")+
  coord_flip()+
  theme_bw()+
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(),legend.position  = "none")+
  scale_y_continuous(breaks=seq(0, 25, 1)) +
  labs(x="Participation Count", y="Team", title="Team Participation Over 25 Years")

mean_t<-as.integer(mean(team_participation$n))

median_t<-median(team_participation$n)

print(paste("Average of attending the league: ",mean_t))

## [1] "Average of attending the league:  9"

print(paste("Median of attending the league: ",median_t))

## [1] "Median of attending the league:  6"

18 teams have managed to stay in the league above the average.

1.2. Total Championship Count of Teams

We see that there are only 4 champions at last 25 years
Galatasaray had a huge domination in that scale

total_champions <- season_statistics %>% top_n(1, wt=total_point) %>% filter(goal_difference == max(goal_difference)) 
total_champions_group <- total_champions %>% group_by(team) %>% count(team) %>% select(team,n) %>% arrange(desc(n))

pie = ggplot(total_champions_group, aes(x="", y=n, fill=team)) + geom_bar(stat="identity", width=1)
pie = pie + coord_polar("y", start=0) + geom_text(aes(label = paste0(round(n))), position = position_stack(vjust = 0.5),color="#FFFFFF",size=6)
pie = pie + scale_fill_manual(values=c("#000000", "#006600", "#003366","#FF0000"))
pie = pie + labs(x = NULL, y = NULL, fill = NULL, title = "CHAMPIONS OF 25 YEARS")
pie = pie + theme_classic() + theme(axis.line = element_blank(),
          axis.text = element_blank(),
          axis.ticks = element_blank(),
          plot.title = element_text(hjust = 0.5, color = "#000000"))
pie

1.3. Total Points of Champions

We see that that the teams are required to obtain 69-85 point interval to achieve 1st rank in the league.

plot <- ggplot(total_champions,aes(x=season,y=total_point, label=team))+geom_line(size=1,color="green")+geom_point() +
  scale_x_continuous(breaks=seq(1994, 2018, 5)) + expand_limits(y = 40) + theme_classic() + 
  labs(x="Years", y="Total Point", title = "Total Points of Champions")
ggplotly(plot)

1.4. Champions’ Point Distribution at Home and Away

home_away_champs <- total_champions %>% select(season,team,avg_home_p,avg_away_p,avg_total_p)

awayv<-as.vector(home_away_champs$avg_away_p)
homev<-as.vector(home_away_champs$avg_home_p)
df<-tibble(season=as.integer(home_away_champs$season),team=home_away_champs$team,homev,awayv)

seav<-as.vector(home_away_champs$season)
seas<-rep(seav,2)
typea<-c(rep("away",50))
typeh<-c(rep("home",50))
df2<-data_frame(seas,typeh,typea)

stack_point<-inner_join(df,df2,by=c("season"="seas"))%>%select(season,typeh,typea,homev,awayv)

df3<-stack_point%>%select(season,typeh,homev)%>%group_by(season,typeh,homev)%>%summarise(typeh_d=n_distinct(typeh))%>%select(season,type=typeh,poin=homev)

df4<-stack_point%>%select(season,typea,awayv)%>%group_by(season,typea,awayv)%>%summarise(typeh_d=n_distinct(typea))%>%select(season,type=typea,poin=awayv)

stack_point2<-rbind.data.frame(df3,df4)


ggplot(stack_point2,aes(fill=type,y=poin,x=season))+geom_bar(position = "stack",stat="identity")+labs(title= "
       Distribution of Points by Home-Away",x="Season",y="Home Point- Away Point")

From the chart, it is seen that the champion teams get their scores mainly from the matches they play at home.

1.5. Total Point And Score Correlation of Champions

total_goals <- total_champions %>% mutate(goal_for_point = goal_scored/ total_point) %>% select(season, team, total_point, goal_scored,goal_for_point) %>%
arrange(desc(goal_for_point))

plot <- ggplot(total_goals,aes(x=season,y=goal_for_point))+geom_line(size=1,color="red")+geom_point() +
  scale_x_continuous(breaks=seq(1994, 2018, 5)) + theme_bw() + 
  labs(x="Years", y="Goal Per Point", title = "Goal Per Point By Years Table")
ggplotly(plot)

2. First Half / End Season Analyses

2.1. First Half Rankings of Champions

Let us examine the first half rankings of the champion teams.
What is the first half ranking to achieve championship?

ranked_season_statistics <- season_statistics %>% group_by(season) %>% 
  mutate(end_rank = rank(-total_point, ties.method = "first"),
  half_rank = rank(-total_point_half, ties.method = "first"),
  home_score_rank = rank(-home_goal, ties.method = "first"),
  away_score_rank = rank(-away_goal, ties.method = "first"),
  home_concede_rank = rank(home_conceded, ties.method = "first"),
  away_concede_rank = rank(away_conceded, ties.method = "first"),
  total_goal_rank = rank(-goal_scored, ties.method = "first"),
  total_concede_rank = rank(goal_conceded, ties.method = "first"),
  rank_difference = half_rank - end_rank)
champion_rankings <- ranked_season_statistics %>% filter(end_rank==1) %>% group_by(rank_difference) %>% count(rank_difference) %>%
  select(rank_difference, n)
plot<-ggplot(champion_rankings, aes(x=reorder(rank_difference,-n), n, fill=rank_difference)) + geom_bar(stat="identity") + 
  theme_bw() + labs(x="Rank Difference", title="Rank Difference between Half-season and End-season", y="Occurance", fill="Rank Difference")
ggplotly(plot)

The team that trying to achieve championship at the end of the season should take place in first three rank at the half year table.

2.2. First Half Leaders’ End Year Performances

Is success at the first half enough for season-ending?

  half_year_rankings <- ranked_season_statistics %>% filter(half_rank==1) %>% group_by(end_rank) %>% count(end_rank) %>%
  select(end_rank, n)
  plot<-ggplot(half_year_rankings, aes(x=end_rank, n, fill=end_rank)) + geom_bar(stat="identity") + 
  theme_bw() + labs(x="Position", title="End-Season Position of First Half Leaders", y="Occurance", fill="Position")
ggplotly(plot)

* Yes there is evidence that most of the half year leaders are going to finish in the first two rankings at the end of season.

2.3. Relagated Teams’ Half Year Performances

What is the first half position not to be relegated at the end of the season?

relegated_teams <- ranked_season_statistics %>% filter(end_rank>15) %>% group_by(half_rank) %>% count(half_rank) %>%
  select(half_rank, n)

plot<-ggplot(relegated_teams, aes(x=half_rank, n, fill=half_rank)) + geom_bar(stat="identity") + 
  theme_bw() + labs(x="Position", title="Half-Season Position of Relegated Teams", y="Occurance", fill="Position")
ggplotly(plot)

2.4 Best Second Half Performances

Let us show the biggest leaps from half-season to season end. Fenerbahce had a chaotic first half last year.

best_comebacks <- ranked_season_statistics %>% arrange(desc(rank_difference)) %>% select(season, team, half_rank, end_rank) %>%
  head(8)
kable(best_comebacks) %>%
  kable_styling("striped", full_width = F) %>%
  scroll_box(width = "100%", height = "400px")

season	team	half_rank	end_rank
2018	Fenerbahce	16	6
2012	Kayserispor	15	5
2006	Trabzonspor	13	4
2001	Genclerbirligi	17	8
1997	Altay	16	7
2001	Denizlispor	13	5
2015	Ankaraspor	12	5
2007	Ankaraspor	17	10

2.5 Worst Second Half Performances

Although there were radical changes in first and last three rank at the half/end season, middle rankings can differ so much as well.

worst_second_halfs <- ranked_season_statistics %>% arrange(rank_difference) %>% select(season, team, half_rank, end_rank) %>%
  head(8)
kable(worst_second_halfs) %>%
  kable_styling("striped", full_width = F) %>%
  scroll_box(width = "100%", height = "400px")

season	team	half_rank	end_rank
2018	Kasimpasa	5	14
2016	Ankaraspor	6	15
2016	Bursaspor	5	13
2011	Mersin Idman Yurdu	6	14
2007	Konyaspor	6	14
2006	Manisaspor	4	12
1999	Altay	7	15
2012	Karabukspor	8	15

Especially the local teams made a good start to the season, but they could not continue their success at the end of the season.

3. Goal Performance Analyses

3.1 Goal Scored Rank By Home/Away Scale

total_champions_ranked <- ranked_season_statistics %>% filter(end_rank==1)
goal_score_ranked <- total_champions_ranked %>% select(season, team, home_goal, home_score_rank, away_goal, away_score_rank)
home_ranking <- goal_score_ranked %>% mutate(rank=home_score_rank, type="HOME")
away_ranking <- goal_score_ranked %>% mutate(rank=away_score_rank, type="AWAY")
total_ranking <- bind_rows(home_ranking, away_ranking)
p1<-ggplot(total_ranking,aes(x = season, y = rank,color=type))+
  geom_point()+ 
  geom_line(aes(group = type)) +
  labs(x="Season", y = "Rank",color = "Type", title = "Goal Score Home/Away Ranking")+ theme_bw() +
  scale_x_continuous(breaks=seq(1994, 2018, 5))
ggplotly(p1)

3.2. Goal Concede Rank By Home/Away Scale

goal_concede_ranked <- total_champions_ranked %>% select(season, team, home_conceded, home_concede_rank, away_conceded, away_concede_rank)
home_ranking <- goal_concede_ranked %>% mutate(rank=home_concede_rank, type="HOME")
away_ranking <- goal_concede_ranked %>% mutate(rank=away_concede_rank, type="AWAY")
total_ranking <- bind_rows(home_ranking, away_ranking)
p2<-ggplot(total_ranking,aes(x = season, y = rank,color=type))+
  geom_point()+ 
  geom_line(aes(group = type)) +
  labs(x="Season", y = "Rank",color = "Type", title = "Goal Concede Home/Away Ranking")+ theme_bw() +
  scale_x_continuous(breaks=seq(1994, 2018, 5))
ggplotly(p2)

3.3. Goal Rank / Goal Concede Rank Scale

goal_ranked <- total_champions_ranked %>% select(season, team, total_goal_rank, total_concede_rank)
home_ranking <- goal_ranked %>% mutate(rank=total_goal_rank, type="SCORE")
away_ranking <- goal_ranked %>% mutate(rank=total_concede_rank, type="CONCEDE")
total_ranking <- bind_rows(home_ranking, away_ranking)
p3<-ggplot(total_ranking,aes(x = season, y = rank,color=type))+
  geom_point()+ 
  geom_line(aes(group = type)) +
  labs(x="Season", y = "Rank",color = "Type", title = "Goal Score/Concede Ranking") + theme_bw() +
  scale_x_continuous(breaks=seq(1994, 2018, 5))
ggplotly(p3)

We found that total scored goal number is a more decisive factor than total conceded goal number during most of the seasons. A team is more likely to become a champion, when that team scores more goal than others and still this particular team doesn’t need to be in the first place when it comes the ranking of conceded goal number (team concedes less goal than its rivals) with the help of achieving the highest scored goal rank.
In our table it is obvious that, champions of 16 seasons out of 25 seasons achieved to be on the first rank at total scored goal. On the other hand, champions of the 8 seasons out of 25 seasons hold the first ranking at minimum conceded goal number.

3.4. Emperor’s Inattentive Aggression once Paid Him Back!

Four years in a row, between 1996 - 2000, Galatasaray was crowned champion. This success is the maximum consecutive chamionship pattern in 25 seasons. Other consecutive championships only counts up to 2 (Again Galatasaray, Fenerbahce and Beşiktaş). Focused on the that 4 years, Galatasaray always held the first place at scored goal rank but couldn’t reflect this success onto minimum conceded goal rank. Especially in 1998 seasons, Galatasaray held the 8th place at minimum conceded goal rank. This is the biggest gap between scored goal rank and mininum conceded goal rank for a champion.

3.5. Republic’s Scored Goal Persistence

Focused on the seasons that Fenerbahce took the first place at total points, during these seasons Fenerbahce always held the first place at total scored goal number. (Only Fenerbahce has this statistics among all champions). Still, it is impossible to observe the same success at mininmum conceded goal rank.

4. Longest Streaks of 4 Champions

champions <- c("Galatasaray", "Fenerbahce", "Besiktas", "Bursaspor")
longest_streak <- function(statistics, match_result, team_name){
  statistics <- statistics %>% filter(HomeTeam==team_name | AwayTeam==team_name) %>%
    transmute(season, weekIndex, team = case_when(HomeTeam == team_name ~ HomeTeam, AwayTeam == team_name ~ AwayTeam), result = 
                case_when(FTR == 'D' ~ 'D',
                          HomeTeam == team & FTR == 'A' ~ 'L',
                          HomeTeam == team & FTR == 'H' ~ 'W',
                          AwayTeam == team & FTR == 'A' ~ 'W',
                          AwayTeam == team & FTR == 'H' ~ 'L')) %>% arrange(season, weekIndex) %>% transmute(season, team, result, rowIndex =seq.int(nrow(.))) %>% filter(result %in% match_result) %>% mutate(prev = lag(rowIndex))
  statistics <- statistics %>% mutate(continue = case_when(is.na(prev) ~ 1, prev== rowIndex - 1 ~ 1, TRUE ~ 0))
  recurring <- rle(statistics$continue)
  return (c(team=team_name, consecutive=(max(recurring$lengths[as.logical(recurring$values)]))))
}

get_longest_streak <- function(statistics,match_result, team_list){
  longest <- lst()
  for (x in team_list){
  longest <- rbind(longest, longest_streak(statistics, match_result, x))
  }
  return (as.data.frame(longest))
}

4.1. Longest Win Streaks of 4 Champions

longest_winning <- get_longest_streak(all_data, c("W"), champions)
kable(longest_winning) %>%
  kable_styling("striped", full_width = F)

team	consecutive
Galatasaray	9
Fenerbahce	11
Besiktas	11
Bursaspor	7

4.2. Longest Unbeaten Streaks of 4 Champions

longest_unbeaten <- get_longest_streak(all_data, c("W", "D"), champions)
kable(longest_unbeaten) %>%
  kable_styling("striped", full_width = F)

team	consecutive
Galatasaray	23
Fenerbahce	26
Besiktas	25
Bursaspor	16

4.3. Longest Losing Streaks of 4 Champions

longest_losing <- get_longest_streak(all_data, c("L"), champions)
kable(longest_losing) %>%
  kable_styling("striped", full_width = F)

team	consecutive
Galatasaray	4
Fenerbahce	2
Besiktas	5
Bursaspor	6

5. Other Analyses

5.1. First Half / Second Half Match Results

match_results <- all_data %>% filter(FTR %in% c("H", "D", "A") &
                                                HTR %in% c("H", "D", "A")) %>% mutate(first_second = case_when(HTR == "H" & FTR == "H" ~ "Home-Home",
                                                             HTR == "H" & FTR == "D" ~ "Home-Draw",
                                                             HTR == "H" & FTR == "A" ~ "Home-Away",
                                                             HTR == "D" & FTR == "H" ~ "Draw-Home",
                                                             HTR == "D" & FTR == "D" ~ "Draw-Draw",
                                                             HTR == "D" & FTR == "A" ~ "Draw-Away",
                                                             HTR == "A" & FTR == "H" ~ "Away-Home",
                                                             HTR == "A" & FTR == "D" ~ "Away-Draw",
                                                             HTR == "A" & FTR == "A" ~ "Away-Away")) %>%
  group_by(first_second) %>% summarise(count=n())
ggplot(match_results, aes(reorder(first_second,count), count, fill=first_second)) + geom_bar(stat="identity") +
  coord_flip() + labs(x="Result", y="Count", title="Result vs Occurance")

5.2. First Half / Second Half Goal Distribution

goal_distribution <- all_data %>% filter(!is.na(HTHG) & !is.na(HTAG) & !is.na(FTHG) & !is.na(FTAG)) %>% group_by(season) %>%
  summarise(half_home_goal = sum(HTHG), half_away_goal = sum(HTAG),
            second_home_goal = sum(FTHG) - half_home_goal, second_away_goal = sum(FTAG) - half_away_goal)
goal_distribution_melt <- melt(goal_distribution, id="season")

ggplot(goal_distribution_melt,aes(season,value,fill=variable))+
  geom_bar(stat="identity")+
  coord_flip()+
  theme_bw()+
  labs(x="Year", y="Score", fill="Category")

5.3. Shots / Shots On Target of Home / Away Teams

shot_distribution <- all_data %>% filter(!is.na(HS) & !is.na(AS) & !is.na(HST) & !is.na(AST)) %>% group_by(weekIndex) %>%
  summarise(home_shot = sum(HS), away_shot = sum(AS),
            home_shot_on_target = sum(HST), away_shot_on_target = sum(AST))
shot_distribution_melt <- melt(shot_distribution, id="weekIndex")

plot2 <- ggplot(shot_distribution_melt, aes(x = weekIndex, y=value, color = variable)) + 
    geom_line(aes(group = variable)) + scale_x_continuous(limits = c(1,34)) + theme_classic() + 
  labs(x="Weeks", y="Shots", title = "Shots Line Graph")
ggplotly(plot2)

5.4. Yellow Cards vs Fouls Committed Over Weeks

yellow_cards_fouls <- all_data %>% filter(!is.na(HY) & !is.na(AY) & !is.na(HF) & !is.na(AF)) %>%
  transmute(away_card_per_foul = AY / AF, home_card_per_foul = HY / HF, weekIndex)
yellow_cards_fouls_melted <- melt(yellow_cards_fouls, id="weekIndex")
plot3 <- ggplot(yellow_cards_fouls_melted,aes(x = weekIndex, y = value, color="red")) + geom_point() +
  labs(x = "Week", y="", title = "Yellow Card Per Faul Diagram") +
  theme(title = element_text(size = 16, face = "bold"), plot.title = element_text(hjust = 0.5), 
        axis.title.x = element_text(size = 14, face = "bold"), 
        axis.title.y = element_text(size = 14, face = "bold"), legend.title = element_blank()) +
  scale_x_continuous(limits = c(0, 34)) + 
  scale_y_continuous(limits = c(0, 1)) + facet_wrap(~variable)
ggplotly(plot3)

fouls <- all_data %>% filter(!is.na(HY) & !is.na(AY) & !is.na(HF) & !is.na(AF)) %>%
  transmute(home_faul = HF, away_faul = AF, weekIndex)
fouls_melted <- melt(fouls, id="weekIndex")
plot4 <- ggplot(fouls_melted,aes(x = weekIndex, y = value, color="yellow")) + geom_point() +
  labs(x = "Week", y="", title = "Fouls Committed Diagram") +
  theme(title = element_text(size = 16, face = "bold"), plot.title = element_text(hjust = 0.5), 
        axis.title.x = element_text(size = 14, face = "bold"), 
        axis.title.y = element_text(size = 14, face = "bold"), legend.title = element_blank()) +
  scale_x_continuous(limits = c(0, 34)) + 
  scale_y_continuous(limits = c(0, 20)) + facet_wrap(~variable)
ggplotly(plot4)

5.5. Most Aggressive Teams

  home_aggressive <- all_data %>% filter(!is.na(HR) & !is.na(HY)) %>% group_by(HomeTeam) %>% mutate(home_card_point = sum(HY) + 3*sum(HR)) 
  away_aggressive <- all_data %>% filter(!is.na(AR) & !is.na(AY)) %>% group_by(AwayTeam) %>% mutate(away_card_point = sum(AY) + 3*sum(AR))
  all_aggressive <- inner_join(home_aggressive, away_aggressive, by=c("HomeTeam" = "AwayTeam")) %>% 
    mutate(total_card_point = home_card_point + away_card_point, team=HomeTeam) %>% select(team, total_card_point)
  
  p5<-ggplot(all_aggressive,aes(reorder(team,total_card_point),total_card_point,fill=team))+
  geom_bar(stat="identity")+
  coord_flip()+
  theme_bw()+
  labs(x="Team", y="Total Card Point", title="Most Aggressive Teams")
  ggplotly(p5)

D.Concluison

In the last 25 years, 49 teams have managed to attend the Turkish Super League at least once and 18 of these teams could stay in the league above the average (9 times).
Throughout 25 years, only 4 teams succeeded to be champion and total points of those fluctuates between 69-85 points interval.
Champion teams scored more point in their home matches than away matches. In general, we have concluded that the teams are better, when playing in their home.
The teams that won the championship at the end of the season were take place in first three rank at the half year table. There is evidence that most of the half year leaders are going to finish in the first two rankings at the end of season.
Mostly, champion teams are on the first rank at total scored goal and a team is more likely to become a champion, when that team scores more goal than others.
Total scored goal number is a more decisive factor than total conceded goal number.
Local teams, below average-attending, failed to continue despite a good start to the season.

A Detail Study About Turkish Super League (from 93-94 to 18-19)