### 1. Create table ###

col_head = c("Team","GP","W","D","L","GF","GA","GD","Pts")                     # Column headings

teams = c("ALB","ACO","AMR","AND","BRG","CTG","EIB","ELC","ELD","ESY","HUE",
          "LEG","LEV","MIR","OVI","FER","SAN","GIJ","TNR","VLD","VIB","ZAR")   # List of teams

Tbl = matrix(0,nrow=length(teams),ncol=9)    # Create empty table
colnames(Tbl) <- col_head         # Insert column headings
Tbl[,1] = teams                   # Put teams in table
table = data.frame(Tbl)           # Convert to data frame

# Change number columns to integer form #
table$GP <- as.integer(table$GP)
table$W <- as.integer(table$W)
table$D <- as.integer(table$D)
table$L <- as.integer(table$L)
table$GF <- as.integer(table$GF)
table$GA <- as.integer(table$GA)
table$GD <- as.integer(table$GD)
table$Pts <- as.integer(table$Pts)

### 2. Fill table ###

## Gameweek 1 ##

# Amorebieta 1 - Levante 1 #

AMR = matrix(c(1,1),nrow=2)
LEV = matrix(c(1,1),nrow=2)

# Valladolid 2 - Sporting Gijon 0 #

VLD = matrix(c(2,0),nrow=2)
GIJ = matrix(c(0,2),nrow=2)

# Racing 4 - Eibar 0 #

SAN = matrix(c(4,0),nrow=2)
EIB = matrix(c(0,4),nrow=2)

# Real Zaragoza 2 - Villareal B 0 #

ZAR = matrix(c(2,0),nrow=2)
VIB = matrix(c(0,2),nrow=2)

# Elche 0 - Racing Ferrol 1 #

ELC = matrix(c(0,1),nrow=2)
FER = matrix(c(1,0),nrow=2)

# Burgos 1 - Huesca 1 #

BRG = matrix(c(1,1),nrow=2)
HUE = matrix(c(1,1),nrow=2)

# Albacete 1 - Espanyol 1 #

ALB = matrix(c(1,1),nrow=2)
ESY = matrix(c(1,1),nrow=2)

# FC Cartagena 0 - Eldense 1 #

CTG = matrix(c(0,1),nrow=2)
ELD = matrix(c(1,0),nrow=2)

# Leganes 0 - Andorra 1 #

LEG = matrix(c(0,1),nrow=2)
AND = matrix(c(1,0),nrow=2)

# Mirandes 4 - Alcorcon 0 #

MIR = matrix(c(4,0),nrow=2)
ACO = matrix(c(0,4),nrow=2)

# Tenerife 1 - Oviedo 0 #

TNR = matrix(c(1,0),nrow=2)
OVI = matrix(c(0,1),nrow=2)

## Gameweek 2 ##

# Andorra 3 - FC Cartagena 2 #

AND = cbind(AND,c(3,2))
CTG = cbind(CTG,c(2,3))

# Real Zaragoza 1 - Valladolid 0 #

ZAR = cbind(ZAR,c(1,0))
VLD = cbind(VLD,c(0,1))

# Eibar 2 - Elche 1 #

EIB = cbind(EIB,c(2,1))
ELC = cbind(ELC,c(1,2))

# Espanyol 2 - Racing 0 #

ESY = cbind(ESY,c(2,0))
SAN = cbind(SAN,c(0,2))

# Levante 3 - Burgos 2 #

LEV = cbind(LEV,c(3,2))
BRG = cbind(BRG,c(2,3))

# Alcorcon 0 - Leganes 2 #

ACO = cbind(ACO,c(0,2))
LEG = cbind(LEG,c(2,0))

# Oviedo 1 - Racing Ferrol 1 #

OVI = cbind(OVI,c(1,1))
FER = cbind(FER,c(1,1))

# Sporting Gijon 3 - Mirandes 0 #

GIJ = cbind(GIJ,c(3,0))
MIR = cbind(MIR,c(0,3))

# Albacete 2 - Amorebieta 2 #

ALB = cbind(ALB,c(2,2))
AMR = cbind(AMR,c(2,2))

# Villarreal B 3 - Eldense 1 #

VIB = cbind(VIB,c(3,1))
ELD = cbind(ELD,c(1,3))

# Huesca 0 - Tenerife 2 #

HUE = cbind(HUE,c(0,2))
TNR = cbind(TNR,c(2,0))

## Gameweek 3 ##

# FC Cartagena 0 - Levante 1 #

CTG = cbind(CTG,c(0,1))
LEV = cbind(LEV,c(1,0))

# Burgos 1 - Oviedo 0 #

BRG = cbind(BRG,c(1,0))
OVI = cbind(OVI,c(0,1))

# Tenerife 0 - Real Zaragoza 1 #

TNR = cbind(TNR,c(0,1))
ZAR = cbind(ZAR,c(1,0))

# Elche 1 - Villarreal B 0 #

ELC = cbind(ELC,c(1,0))
VIB = cbind(VIB,c(0,1))

# Valladolid 0 - Alcorcon 2 #

VLD = cbind(VLD,c(0,2))
ACO = cbind(ACO,c(2,0))

# Racing Ferrol 2 - Sporting Gijon 0 #

FER = cbind(FER,c(2,0))
GIJ = cbind(GIJ,c(0,2))

# Mirandes 0 - Espanyol 1 #

MIR = cbind(MIR,c(0,1))
ESY = cbind(ESY,c(1,0))

# Amorebieta 3 - Andorra 0 #

AMR = cbind(AMR,c(3,0))
AND = cbind(AND,c(0,3))

# Leganes 2 - Albacete 0 #

LEG = cbind(LEG,c(2,0))
ALB = cbind(ALB,c(0,2))

# Eldense 2 - Eibar 1 #

ELD = cbind(ELD,c(2,1))
EIB = cbind(EIB,c(1,2))

# Racing 0 - Huesca 0 #

SAN = cbind(SAN,c(0,0))
HUE = cbind(HUE,c(0,0))

## Gameweek 4 ##

# Alcorcon 1 - Racing Ferrol 1 #

ACO = cbind(ACO,c(1,1))
FER = cbind(FER,c(1,1))

# Albacete 2 - Valladolid 0 #

ALB = cbind(ALB,c(2,0))
VLD = cbind(VLD,c(0,2))

# Sporting Gijon 2 - Burgos 1 #

GIJ = cbind(GIJ,c(2,1))
BRG = cbind(BRG,c(1,2))

# Levante 1 - Oviedo 1 #

LEV = cbind(LEV,c(1,1))
OVI = cbind(OVI,c(1,1))

# Elche 1 - Racing 1 #

ELC = cbind(ELC,c(1,1))
SAN = cbind(SAN,c(1,1))

# Villarreal B 1 - FC Cartagena 2 #

VIB = cbind(VIB,c(1,2))
CTG = cbind(CTG,c(2,1))

# Andorra 0 - Tenerife 1 #

AND = cbind(AND,c(0,1))
TNR = cbind(TNR,c(1,0))

# Eibar 0 - Leganes 1 #

EIB = cbind(EIB,c(0,1))
LEG = cbind(LEG,c(1,0))

# Real Zaragoza 2 - Eldense 0 #

ZAR = cbind(ZAR,c(2,0))
ELD = cbind(ELD,c(0,2))

# Espanyol 3 - Amorebieta 2 #

ESY = cbind(ESY,c(3,2))
AMR = cbind(AMR,c(2,3))

# Huesca 1 - Mirandes 1 #

HUE = cbind(HUE,c(1,1))
MIR = cbind(MIR,c(1,1))

## Gameweek 5 ##

# Levante 1 - Espanyol 4 #

LEV = cbind(LEV,c(1,4))
ESY = cbind(ESY,c(4,1))

# Burgos 1 - Eibar 0 #

BRG = cbind(BRG,c(1,0))
EIB = cbind(EIB,c(0,1))

# Oviedo 0 - Sporting Gijon 0 #

OVI = cbind(OVI,c(0,0))
GIJ = cbind(GIJ,c(0,0))

# Tenerife 2 - Albacete 0 #

TNR = cbind(TNR,c(2,0))
ALB = cbind(ALB,c(0,2))

# Leganes 2 - Huesca 0 #

LEG = cbind(LEG,c(2,0))
HUE = cbind(HUE,c(0,2))

# Racing Ferrol 2 - Villarreal B 2 #

FER = cbind(FER,c(2,2))
VIB = cbind(VIB,c(2,2))

# Racing 1 - Amorebieta 0 #

SAN = cbind(SAN,c(1,0))
AMR = cbind(AMR,c(0,1))

# Mirandes 4 - Andorra 3 #

MIR = cbind(MIR,c(4,3))
AND = cbind(AND,c(3,4))

# FC Cartagena 1 - Real Zaragoza 3 #

CTG = cbind(CTG,c(1,3))
ZAR = cbind(ZAR,c(3,1))

# Valladolid 1 - Elche 1 #

VLD = cbind(VLD,c(1,1))
ELC = cbind(ELC,c(1,1))

# Eldense 2 - Alcorcon 2 #

ELD = cbind(ELD,c(2,2))
ACO = cbind(ACO,c(2,2))

## Gameweek 6 ##

# Real Zaragoza 1 - Racing 1 #

ZAR = cbind(ZAR,c(1,1))
SAN = cbind(SAN,c(1,1))

# Huesca 2 - Villarreal B 2 #

HUE = cbind(HUE,c(2,2))
VIB = cbind(VIB,c(2,2))

# Valladolid 1 - FC Cartagena 0 #

VLD = cbind(VLD,c(1,0))
CTG = cbind(CTG,c(0,1))

# Alcorcon 0 - Levante 2 #

ACO = cbind(ACO,c(0,2))
LEV = cbind(LEV,c(2,0))

# Albacete 2 - Burgos 1 #

ALB = cbind(ALB,c(2,1))
BRG = cbind(BRG,c(1,2))

# Amorebieta 2 - Mirandes 0 #

AMR = cbind(AMR,c(2,0))
MIR = cbind(MIR,c(0,2))

# Eibar 2 - Racing Ferrol 0 #

EIB = cbind(EIB,c(2,0))
FER = cbind(FER,c(0,2))

# Espanyol 3 - Eldense 3 #

ESY = cbind(ESY,c(3,3))
ELD = cbind(ELD,c(3,3))

# Elche 1 - Leganes 0 #

ELC = cbind(ELC,c(1,0))
LEG = cbind(LEG,c(0,1))

# Sporting Gijon 2 - Tenerife 1 #

GIJ = cbind(GIJ,c(2,1))
TNR = cbind(TNR,c(1,2))

# Andorra 1 - Oviedo 0 #

AND = cbind(AND,c(1,0))
OVI = cbind(OVI,c(0,1))

## Gameweek 7 ##

# FC Cartagena 1 - Eibar 2 #

CTG = cbind(CTG,c(1,2))
EIB = cbind(EIB,c(2,1))

# Andorra 0 - Sporting Gijon 0 #

AND = cbind(AND,c(0,0))
GIJ = cbind(GIJ,c(0,0))

# Levante 2 - Eldense 0 #

LEV = cbind(LEV,c(2,0))
ELD = cbind(ELD,c(0,2))

# Burgos 4 - Elche 0 #

BRG = cbind(BRG,c(4,0))
ELC = cbind(ELC,c(0,4))

# Alcorcon 0 - Huesca 2 #

ACO = cbind(ACO,c(0,2))
HUE = cbind(HUE,c(2,0))

# Racing 2 - Albacete 1 #

SAN = cbind(SAN,c(2,1))
ALB = cbind(ALB,c(1,2))

# Villarreal B 3 - Amorebieta 1 #

VIB = cbind(VIB,c(3,1))
AMR = cbind(AMR,c(1,3))

# Oviedo 0 - Valladolid 1 #

OVI = cbind(OVI,c(0,1))
VLD = cbind(VLD,c(1,0))

# Mirandes 1 - Leganes 3 #

MIR = cbind(MIR,c(1,3))
LEG = cbind(LEG,c(3,1))

# Racing Ferrol 1 - Real Zaragoza 0 #

FER = cbind(FER,c(1,0))
ZAR = cbind(ZAR,c(0,1))

# Tenerife 1 - Espanyol 0 #

TNR = cbind(TNR,c(1,0))
ESY = cbind(ESY,c(0,1))

## Gameweek 8 ##

# Leganes 2 - Racing 1 #

LEG = cbind(LEG,c(2,1))
SAN = cbind(SAN,c(1,2))

# Eibar 3 - Tenerife 0 #

EIB = cbind(EIB,c(3,0))
TNR = cbind(TNR,c(0,3))

# Elche 0 - Levante 0 #

ELC = cbind(ELC,c(0,0))
LEV = cbind(LEV,c(0,0))

# Villarreal B 2 - Alcorcon 2 #

VIB = cbind(VIB,c(2,2))
ACO = cbind(ACO,c(2,2))

# Albacete 3 - Andorra 1 #

ALB = cbind(ALB,c(3,1))
AND = cbind(AND,c(1,3))

# Eldense 1 - Oviedo 3 #

ELD = cbind(ELD,c(1,3))
OVI = cbind(OVI,c(3,1))

# Real Zaragoza 0 - Mirandes 1 #

ZAR = cbind(ZAR,c(0,1))
MIR = cbind(MIR,c(1,0))

# Valladolid 3 - Burgos 0 #

VLD = cbind(VLD,c(3,0))
BRG = cbind(BRG,c(0,3))

# Amorebieta 0 - FC Cartagena 0 #

AMR = cbind(AMR,c(0,0))
CTG = cbind(CTG,c(0,0))

# Huesca 0 - Sporting Gijon 1 #

HUE = cbind(HUE,c(0,1))
GIJ = cbind(GIJ,c(1,0))

# Espanyol 3 - Racing Ferrol 0 #

ESY = cbind(ESY,c(3,0))
FER = cbind(FER,c(0,3))

## Gameweek 9 ##

# Levante 1 - Villarreal B 1 #

LEV = cbind(LEV,c(1,1))
VIB = cbind(VIB,c(1,1))

# Alcorcon 1 - Albacete 2 #

ACO = cbind(ACO,c(1,2))
ALB = cbind(ALB,c(2,1))

# Tenerife 2 - Racing 0 #

TNR = cbind(TNR,c(2,0))
SAN = cbind(SAN,c(0,2))

# Oviedo 1 - Huesca 0 #

OVI = cbind(OVI,c(1,0))
HUE = cbind(HUE,c(0,1))

# Eldense 0 - Valladolid 1 #

ELD = cbind(ELD,c(0,1))
VLD = cbind(VLD,c(1,0))

# Sporting Gijon 2 - Elche 0 #

GIJ = cbind(GIJ,c(2,0))
ELC = cbind(ELC,c(0,2))

# Burgos 1 - Leganes 0 #

BRG = cbind(BRG,c(1,0))
LEG = cbind(LEG,c(0,1))

# Mirandes 1 - Eibar 3 #

MIR = cbind(MIR,c(1,3))
EIB = cbind(EIB,c(3,1))

# Andorra 0 - Real Zaragoza 1 #

AND = cbind(AND,c(0,1))
ZAR = cbind(ZAR,c(1,0))

# FC Cartagena 0 - Espanyol 2 #

CTG = cbind(CTG,c(0,2))
ESY = cbind(ESY,c(2,0))

# Racing Ferrol 1 - Amorebieta 0 #

FER = cbind(FER,c(1,0))
AMR = cbind(AMR,c(0,1))

## Gameweek 10 ##

# Albacete 0 - Levante 2 #

ALB = cbind(ALB,c(0,2))
LEV = cbind(LEV,c(2,0))

# Huesca 0 - Eldense 1 #

HUE = cbind(HUE,c(0,1))
ELD = cbind(ELD,c(1,0))

# Racing 3 - Sporting Gijon 2 #

SAN = cbind(SAN,c(3,2))
GIJ = cbind(GIJ,c(2,3))

# Leganes 0 - Oviedo 0 #

LEG = cbind(LEG,c(0,0))
OVI = cbind(OVI,c(0,0))

# Amorebieta 1 - Eibar 2 #

AMR = cbind(AMR,c(1,2))
EIB = cbind(EIB,c(2,1))

# Valladolid 3 - Mirandes 2 #

VLD = cbind(VLD,c(3,2))
MIR = cbind(MIR,c(2,3))

# Racing Ferrol 1 - FC Cartagena 1 #

FER = cbind(FER,c(1,1))
CTG = cbind(CTG,c(1,1))

# Tenerife 2 - Burgos 1 #

TNR = cbind(TNR,c(2,1))
BRG = cbind(BRG,c(1,2))

# Real Zaragoza 0 - Alcorcon 2 #

ZAR = cbind(ZAR,c(0,2))
ACO = cbind(ACO,c(2,0))

# Elche 2 - Andorra 1 #

ELC = cbind(ELC,c(2,1))
AND = cbind(AND,c(1,2))

# Villarreal B 3 - Espanyol 1 #

VIB = cbind(VIB,c(3,1))
ESY = cbind(ESY,c(1,3))

## Gameweek 11 ##

# Oviedo 3 - Albacete 0 #

OVI = cbind(OVI,c(3,0))
ALB = cbind(ALB,c(0,3))

# Mirandes 1 - Tenerife 1 #

MIR = cbind(MIR,c(1,1))
TNR = cbind(TNR,c(1,1))

# FC Cartagena 2 - Racing 3 #

CTG = cbind(CTG,c(2,3))
SAN = cbind(SAN,c(3,2))

# Sporting Gijon 2 - Real Zaragoza 2 #

GIJ = cbind(GIJ,c(2,2))
ZAR = cbind(ZAR,c(2,2))

# Espanyol 2 - Valladolid 0 #

ESY = cbind(ESY,c(2,0))
VLD = cbind(VLD,c(0,2))

# Burgos 3 - Villarreal B 2 #

BRG = cbind(BRG,c(3,2))
VIB = cbind(VIB,c(2,3))

# Eldense 1 - Elche 1 #

ELD = cbind(ELD,c(1,1))
ELC = cbind(ELC,c(1,1))

# Andorra 2 - Alcorcon 0 #

AND = cbind(AND,c(2,0))
ACO = cbind(ACO,c(0,2))

# Eibar 1 - Huesca 1 #

EIB = cbind(EIB,c(1,1))
HUE = cbind(HUE,c(1,1))

# Leganes 6 - Amorebieta 0 #

LEG = cbind(LEG,c(6,0))
AMR = cbind(AMR,c(0,6))

# Levante 1 - Racing Ferrol 0 #

LEV = cbind(LEV,c(1,0))
FER = cbind(FER,c(0,1))

## Gameweek 12 ##

# Espanyol 0 - Leganes 1 #

ESY = cbind(ESY,c(0,1))
LEG = cbind(LEG,c(1,0))

# Amorebieta 0 - Oviedo 0 #

AMR = cbind(AMR,c(0,0))
OVI = cbind(OVI,c(0,0))

# Villarreal B 0 - Mirandes 3 #

VIB = cbind(VIB,c(0,3))
MIR = cbind(MIR,c(3,0))

# Tenerife 0 - Levante 0 #

TNR = cbind(TNR,c(0,0))
LEV = cbind(LEV,c(0,0))

# Real Zaragoza 2 - Eibar 3 #

ZAR = cbind(ZAR,c(2,3))
EIB = cbind(EIB,c(3,2))

# Racing Ferrol 1 - Eldense 1 #

FER = cbind(FER,c(1,1))
ELD = cbind(ELD,c(1,1))

# Huesca 0 - Elche 1 #

HUE = cbind(HUE,c(0,1))
ELC = cbind(ELC,c(1,0))

# Albacete 1 - Sporting Gijon 3 #

ALB = cbind(ALB,c(1,3))
GIJ = cbind(GIJ,c(3,1))

# Racing 3 - Burgos 0 #

SAN = cbind(SAN,c(3,0))
BRG = cbind(BRG,c(0,3))

# Valladolid 2 - Andorra 0 #

VLD = cbind(VLD,c(2,0))
AND = cbind(AND,c(0,2))

# Alcorcon 1 - FC Cartagena 1 #

ACO = cbind(ACO,c(1,1))
CTG = cbind(CTG,c(1,1))

## Gameweek 13 ##

# Eibar 5 - Valladolid 1 #

EIB = cbind(EIB,c(5,1))
VLD = cbind(VLD,c(1,5))

# Eldense 2 - Amorebieta 0 #

ELD = cbind(ELD,c(2,0))
AMR = cbind(AMR,c(0,2))

# Sporting Gijon 2 - Espanyol 0 #

GIJ = cbind(GIJ,c(2,0))
ESY = cbind(ESY,c(0,2))

# Andorra 2 - Levante 0 #

AND = cbind(AND,c(2,0))
LEV = cbind(LEV,c(0,2))

# Elche 2 - Tenerife 1 #

ELC = cbind(ELC,c(2,1))
TNR = cbind(TNR,c(1,2))

# Mirandes 2 - FC Cartagena 1 #

MIR = cbind(MIR,c(2,1))
CTG = cbind(CTG,c(1,2))

# Huesca 0 - Albacete 0 #

HUE = cbind(HUE,c(0,0))
ALB = cbind(ALB,c(0,0))

# Leganes 1 - Villarreal B 0 #

LEG = cbind(LEG,c(1,0))
VIB = cbind(VIB,c(0,1))

# Oviedo 2 - Alcorcon 0 #

OVI = cbind(OVI,c(2,0))
ACO = cbind(ACO,c(0,2))

# Racing 1 - Racing Ferrol 3 #

SAN = cbind(SAN,c(1,3))
FER = cbind(FER,c(3,1))

# Burgos 1 - Real Zaragoza 1 #

BRG = cbind(BRG,c(1,1))
ZAR = cbind(ZAR,c(1,1))

## Gameweek 14 ##

# Espanyol 2 - Eibar 2 #

ESY = cbind(ESY,c(2,2))
EIB = cbind(EIB,c(2,2))

# Villarreal B 0 - Sporting Gijon 3 #

VIB = cbind(VIB,c(0,3))
GIJ = cbind(GIJ,c(3,0))

# Levante 2 - Mirandes 2 #

LEV = cbind(LEV,c(2,2))
MIR = cbind(MIR,c(2,2))

# Valladolid 2 - Tenerife 0 #

VLD = cbind(VLD,c(2,0))
TNR = cbind(TNR,c(0,2))

# Albacete 1 - Elche 1 #

ALB = cbind(ALB,c(1,1))
ELC = cbind(ELC,c(1,1))

# Racing Ferrol 1 - Andorra 0 #

FER = cbind(FER,c(1,0))
AND = cbind(AND,c(0,1))

# Amorebieta 0 - Huesca 1 #

AMR = cbind(AMR,c(0,1))
HUE = cbind(HUE,c(1,0))

# FC Cartagena 0 - Leganes 3 #

CTG = cbind(CTG,c(0,3))
LEG = cbind(LEG,c(3,0))

# Alcorcon 3 - Racing 1 #

ACO = cbind(ACO,c(3,1))
SAN = cbind(SAN,c(1,3))

# Eldense 2 - Burgos 0 #

ELD = cbind(ELD,c(2,0))
BRG = cbind(BRG,c(0,2))

# Real Zaragoza 0 - Oviedo 0 #

ZAR = cbind(ZAR,c(0,0))
OVI = cbind(OVI,c(0,0))

## Gameweek 15 ##

# Leganes 2 - Levante 1 #

LEG = cbind(LEG,c(2,1))
LEV = cbind(LEV,c(1,2))

# Racing 2 - Valladolid 3 #

SAN = cbind(SAN,c(2,3))
VLD = cbind(VLD,c(3,2))

# Mirandes 1 - Racing Ferrol 2 #

MIR = cbind(MIR,c(1,2))
FER = cbind(FER,c(2,1))

# Elche 2 - Real Zaragoza 0 #

ELC = cbind(ELC,c(2,0))
ZAR = cbind(ZAR,c(0,2))

# Sporting Gijon 1 - Amorebieta 1 #

GIJ = cbind(GIJ,c(1,1))
AMR = cbind(AMR,c(1,1))

# Burgos 4 - Alcorcon 2 #

BRG = cbind(BRG,c(4,2))
ACO = cbind(ACO,c(2,4))

# Andorra 1 - Eldense 3 #

AND = cbind(AND,c(1,3))
ELD = cbind(ELD,c(3,1))

# Huesca 1 - Espanyol 1 #

HUE = cbind(HUE,c(1,1))
ESY = cbind(ESY,c(1,1))

# Tenerife 0 - Villarreal B 1 #

TNR = cbind(TNR,c(0,1))
VIB = cbind(VIB,c(1,0))

# Eibar 1 - Albacete 1 #

EIB = cbind(EIB,c(1,1))
ALB = cbind(ALB,c(1,1))

# Oviedo 1 - FC Cartagena 1 #

OVI = cbind(OVI,c(1,1))
CTG = cbind(CTG,c(1,1))

## Gameweek 16 ##

# Valladolid 1 - Leganes 1 #

VLD = cbind(VLD,c(1,1))
LEG = cbind(LEG,c(1,1))

# Alcorcon 0 - Sporting Gijon 0 #

ACO = cbind(ACO,c(0,0))
GIJ = cbind(GIJ,c(0,0))

# Amorebieta 2 - Tenerife 0 #

AMR = cbind(AMR,c(2,0))
TNR = cbind(TNR,c(0,2))

# Real Zaragoza 0 - Huesca 2 #

ZAR = cbind(ZAR,c(0,2))
HUE = cbind(HUE,c(2,0))

# Espanyol 2 - Elche 0 #

ESY = cbind(ESY,c(2,0))
ELC = cbind(ELC,c(0,2))

# Racing Ferrol 1 - Burgos 1 #

FER = cbind(FER,c(1,1))
BRG = cbind(BRG,c(1,1))

# Oviedo 2 - Eibar 1 #

OVI = cbind(OVI,c(2,1))
EIB = cbind(EIB,c(1,2))

# Eldense 2 - Mirandes 2 #

ELD = cbind(ELD,c(2,2))
MIR = cbind(MIR,c(2,2))

# Villarreal B 0 - Andorra 0 #

VIB = cbind(VIB,c(0,0))
AND = cbind(AND,c(0,0))

# FC Cartagena 1 - Albacete 1 #

CTG = cbind(CTG,c(1,1))
ALB = cbind(ALB,c(1,1))

# Levante 2 - Racing 4 #

LEV = cbind(LEV,c(2,4))
SAN = cbind(SAN,c(4,2))

## Gameweek 17 ##

# Huesca 0 - Valladolid 1 #

HUE = cbind(HUE,c(0,1))
VLD = cbind(VLD,c(1,0))

# Burgos 0 - Andorra 0 #

BRG = cbind(BRG,c(0,0))
AND = cbind(AND,c(0,0))

# Racing 2 - Villarreal B 0 #

SAN = cbind(SAN,c(2,0))
VIB = cbind(VIB,c(0,2))

# Albacete 1 - Real Zaragoza 0 #

ALB = cbind(ALB,c(1,0))
ZAR = cbind(ZAR,c(0,1))

# Eibar 3 - Levante 1 #

EIB = cbind(EIB,c(3,1))
LEV = cbind(LEV,c(1,3))

# Leganes 2 - Racing Ferrol 2 #

LEG = cbind(LEG,c(2,2))
FER = cbind(FER,c(2,2))

# Mirandes 2 - Oviedo 1 #

MIR = cbind(MIR,c(2,1))
OVI = cbind(OVI,c(1,2))

# Elche 2 - Amorebieta 0 #

ELC = cbind(ELC,c(2,0))
AMR = cbind(AMR,c(0,2))

# Tenerife 1 - FC Cartagena 1 #

TNR = cbind(TNR,c(1,1))
CTG = cbind(CTG,c(1,1))

# Espanyol 2 - Alcorcon 0 #

ESY = cbind(ESY,c(2,0))
ACO = cbind(ACO,c(0,2))

# Sporting Gijon 2 - Eldense 0 #

GIJ = cbind(GIJ,c(2,0))
ELD = cbind(ELD,c(0,2))

## Gameweek 18 ##

# Oviedo 2 - Espanyol 0 #

OVI = cbind(OVI,c(2,0))
ESY = cbind(ESY,c(0,2))

# Eldense 0 - Tenerife 3 #

ELD = cbind(ELD,c(0,3))
TNR = cbind(TNR,c(3,0))

# FC Cartagena 1 - Sporting Gijon 0 #

CTG = cbind(CTG,c(1,0))
GIJ = cbind(GIJ,c(0,1))

# Real Zaragoza 1 - Leganes 0 #

ZAR = cbind(ZAR,c(1,0))
LEG = cbind(LEG,c(0,1))

# Levante 2 - Valladolid 1 #

LEV = cbind(LEV,c(2,1))
VLD = cbind(VLD,c(1,2))

# Andorra 1 - Huesca 0 #

AND = cbind(AND,c(1,0))
HUE = cbind(HUE,c(0,1))

# Alcorcon 0 - Elche 2 #

ACO = cbind(ACO,c(0,2))
ELC = cbind(ELC,c(2,0))

# Racing Ferrol 5 - Albacete 4 #

FER = cbind(FER,c(5,4))
ALB = cbind(ALB,c(4,5))

# Mirandes 0 - Racing 0 #

MIR = cbind(MIR,c(0,0))
SAN = cbind(SAN,c(0,0))

# Amorebieta 0 - Burgos 1 #

AMR = cbind(AMR,c(0,1))
BRG = cbind(BRG,c(1,0))

# Villarreal B 1 - Eibar 0 #

VIB = cbind(VIB,c(1,0))
EIB = cbind(EIB,c(0,1))

## Gameweek 19 ##

# Albacete 2 - Villarreal B 0 #

ALB = cbind(ALB,c(2,0))
VIB = cbind(VIB,c(0,2))

# Espanyol 1 - Real Zaragoza 1 #

ESY = cbind(ESY,c(1,1))
ZAR = cbind(ZAR,c(1,1))

# Valladolid 2 - Amorebieta 1 #

VLD = cbind(VLD,c(2,1))
AMR = cbind(AMR,c(1,2))

# Sporting Gijon 0 - Levante 0 #

GIJ = cbind(GIJ,c(0,0))
LEV = cbind(LEV,c(0,0))

# Burgos 0 - Mirandes 0 #

BRG = cbind(BRG,c(0,0))
MIR = cbind(MIR,c(0,0))

# Elche 1 - FC Cartagena 2 #

ELC = cbind(ELC,c(1,2))
CTG = cbind(CTG,c(2,1))

# Racing 2 - Oviedo 2 #

SAN = cbind(SAN,c(2,2))
OVI = cbind(OVI,c(2,2))

# Eibar 2 - Andorra 2 #

EIB = cbind(EIB,c(2,2))
AND = cbind(AND,c(2,2))

# Leganes 1 - Eldense 1 #

LEG = cbind(LEG,c(1,1))
ELD = cbind(ELD,c(1,1))

# Huesca 1 - Racing Ferrol 0 #

HUE = cbind(HUE,c(1,0))
FER = cbind(FER,c(0,1))

# Tenerife 1 - Alcorcon 0 #

TNR = cbind(TNR,c(1,0))
ACO = cbind(ACO,c(0,1))

## Gameweek 20 ##

# Oviedo 3 - Elche 2 #

OVI = cbind(OVI,c(3,2))
ELC = cbind(ELC,c(2,3))

# Eldense 3 - Racing 3 #

ELD = cbind(ELD,c(3,3))
SAN = cbind(SAN,c(3,3))

# Andorra 1 - Espanyol 1 #

AND = cbind(AND,c(1,1))
ESY = cbind(ESY,c(1,1))

# FC Cartagena 0 - Burgos 3 #

CTG = cbind(CTG,c(0,3))
BRG = cbind(BRG,c(3,0))

# Sporting Gijon 1 - Leganes 1 #

GIJ = cbind(GIJ,c(1,1))
LEG = cbind(LEG,c(1,1))

# Mirandes 2 - Albacete 0 #

MIR = cbind(MIR,c(2,0))
ALB = cbind(ALB,c(0,2))

# Alcorcon 1 - Eibar 0 #

ACO = cbind(ACO,c(1,0))
EIB = cbind(EIB,c(0,1))

# Levante 2 - Huesca 1 #

LEV = cbind(LEV,c(2,1))
HUE = cbind(HUE,c(1,2))

# Amorebieta 1 - Real Zaragoza 1 #

AMR = cbind(AMR,c(1,1))
ZAR = cbind(ZAR,c(1,1))

# Racing Ferrol 3 - Tenerife 1 #

FER = cbind(FER,c(3,1))
TNR = cbind(TNR,c(1,3))

# Villarreal B 1 - Valladolid 0 #

VIB = cbind(VIB,c(1,0))
VLD = cbind(VLD,c(0,1))

## Gameweek 21 ##

# Racing 2 - Andorra 0 #

SAN = cbind(SAN,c(2,0))
AND = cbind(AND,c(0,2))

# Albacete 1 - Eldense 1 #

ALB = cbind(ALB,c(1,1))
ELD = cbind(ELD,c(1,1))

# Espanyol 3 - Burgos 3 #

ESY = cbind(ESY,c(3,3))
BRG = cbind(BRG,c(3,3))

# Elche 0 - Mirandes 0 #

ELC = cbind(ELC,c(0,0))
MIR = cbind(MIR,c(0,0))

# Real Zaragoza 2 - Levante 2 #

ZAR = cbind(ZAR,c(2,2))
LEV = cbind(LEV,c(2,2))

# Eibar 1 - Sporting Gijon 1 #

EIB = cbind(EIB,c(1,1))
GIJ = cbind(GIJ,c(1,1))

# Leganes 1 - Tenerife 1 #

LEG = cbind(LEG,c(1,1))
TNR = cbind(TNR,c(1,1))

# Villarreal B 1 - Oviedo 1 #

VIB = cbind(VIB,c(1,1))
OVI = cbind(OVI,c(1,1))

# Huesca 3 - FC Cartagena 0 #

HUE = cbind(HUE,c(3,0))
CTG = cbind(CTG,c(0,3))

# Valladolid 0 - Racing Ferrol 1 #

VLD = cbind(VLD,c(0,1))
FER = cbind(FER,c(1,0))

# Amorebieta 1 - Alcorcon 2 #

AMR = cbind(AMR,c(1,2))
ACO = cbind(ACO,c(2,1))

## Gameweek 22 ##

# Eibar 2 - Racing 0 #

EIB = cbind(EIB,c(2,0))
SAN = cbind(SAN,c(0,2))

# Alcorcon 0 - Mirandes 0 #

ACO = cbind(ACO,c(0,0))
MIR = cbind(MIR,c(0,0))

# Levante 3 - Albacete 2 #

LEV = cbind(LEV,c(3,2))
ALB = cbind(ALB,c(2,3))

# Tenerife 0 - Elche 1 #

TNR = cbind(TNR,c(0,1))
ELC = cbind(ELC,c(1,0))

# Oviedo 1 - Amorebieta 1 #

OVI = cbind(OVI,c(1,1))
AMR = cbind(AMR,c(1,1))

# Burgos 1 - Valladolid 0 #

BRG = cbind(BRG,c(1,0))
VLD = cbind(VLD,c(0,1))

# Racing Ferrol 0 - Espanyol 0 #

FER = cbind(FER,c(0,0))
ESY = cbind(ESY,c(0,0))

# Andorra 2 - Leganes 3 #

AND = cbind(AND,c(2,3))
LEG = cbind(LEG,c(3,2))

# Sporting Gijon 0 - Huesca 0 #

GIJ = cbind(GIJ,c(0,0))
HUE = cbind(HUE,c(0,0))

# FC Cartagena 4 - Villarreal B 1 #

CTG = cbind(CTG,c(4,1))
VIB = cbind(VIB,c(1,4))

# Eldense 1 - Real Zaragoza 1 #

ELD = cbind(ELD,c(1,1))
ZAR = cbind(ZAR,c(1,1))

## Gameweek 23 ##

# Albacete 0 - Alcorcon 1 #

ALB = cbind(ALB,c(0,1))
ACO = cbind(ACO,c(1,0))

# Amorebieta 0 - Eldense 2 #

AMR = cbind(AMR,c(0,2))
ELD = cbind(ELD,c(2,0))

# Real Zaragoza 2 - Andorra 0 #

ZAR = cbind(ZAR,c(2,0))
AND = cbind(AND,c(0,2))

# Tenerife 1 - Sporting Gijon 2 #

TNR = cbind(TNR,c(1,2))
GIJ = cbind(GIJ,c(2,1))

# Espanyol 2 - Villarreal B 1 #

ESY = cbind(ESY,c(2,1))
VIB = cbind(VIB,c(1,2))

# Racing Ferrol 1 - Oviedo 3 #

FER = cbind(FER,c(1,3))
OVI = cbind(OVI,c(3,1))

# Racing 0 - FC Cartagena 2 #

SAN = cbind(SAN,c(0,2))
CTG = cbind(CTG,c(2,0))

# Mirandes 1 - Levante 1 #

MIR = cbind(MIR,c(1,1))
LEV = cbind(LEV,c(1,1))

# Huesca 2 - Eibar 3 #

HUE = cbind(HUE,c(2,3))
EIB = cbind(EIB,c(3,2))

# Elche 0 - Valladolid 0 #

ELC = cbind(ELC,c(0,0))
VLD = cbind(VLD,c(0,0))

# Leganes 2 - Burgos 0 #

LEG = cbind(LEG,c(2,0))
BRG = cbind(BRG,c(0,2))

## Gameweek 24 ##

# Eibar 1 - Mirandes 0 #

EIB = cbind(EIB,c(1,0))
MIR = cbind(MIR,c(0,1))

# Alcorcon 0 - Real Zaragoza 0 #

ACO = cbind(ACO,c(0,0))
ZAR = cbind(ZAR,c(0,0))

# FC Cartagena 1 - Amorebieta 0 #

CTG = cbind(CTG,c(1,0))
AMR = cbind(AMR,c(0,1))

# Oviedo 1 - Leganes 0 #

OVI = cbind(OVI,c(1,0))
LEG = cbind(LEG,c(0,1))

# Levante 0 - Tenerife 0 #

LEV = cbind(LEV,c(0,0))
TNR = cbind(TNR,c(0,0))

# Eldense 3 - Espanyol 2 #

ELD = cbind(ELD,c(3,2))
ESY = cbind(ESY,c(2,3))

# Andorra 0 - Elche 1 #

AND = cbind(AND,c(0,1))
ELC = cbind(ELC,c(1,0))

# Villarreal B 1 - Huesca 1 #

VIB = cbind(VIB,c(1,1))
HUE = cbind(HUE,c(1,1))

# Burgos 2 - Albacete 1 #

BRG = cbind(BRG,c(2,1))
ALB = cbind(ALB,c(1,2))

# Sporting Gijon 1 - Racing Ferrol 2 #

GIJ = cbind(GIJ,c(1,2))
FER = cbind(FER,c(2,1))

# Valladolid 3 - Racing 1 #

VLD = cbind(VLD,c(3,1))
SAN = cbind(SAN,c(1,3))

## Gameweek 25 ##

# Elche 2 - Burgos 0 #

ELC = cbind(ELC,c(2,0))
BRG = cbind(BRG,c(0,2))

# Albacete 1 - FC Cartagena 1 #

ALB = cbind(ALB,c(1,1))
CTG = cbind(CTG,c(1,1))

# Huesca 1 - Alcorcon 0 #

HUE = cbind(HUE,c(1,0))
ACO = cbind(ACO,c(0,1))

# Mirandes 3 - Villarreal B 0 #

MIR = cbind(MIR,c(3,0))
VIB = cbind(VIB,c(0,3))

# Leganes 0 - Valladolid 0 #

LEG = cbind(LEG,c(0,0))
VLD = cbind(VLD,c(0,0))

# Tenerife 0 - Andorra 0 #

TNR = cbind(TNR,c(0,0))
AND = cbind(AND,c(0,0))

# Racing Ferrol 1 - Eibar 1 #

FER = cbind(FER,c(1,1))
EIB = cbind(EIB,c(1,1))

# Amorebieta 0 - Racing 1 #

AMR = cbind(AMR,c(0,1))
SAN = cbind(SAN,c(1,0))

# Oviedo 1 - Eldense 1 #

OVI = cbind(OVI,c(1,1))
ELD = cbind(ELD,c(1,1))

# Espanyol 2 - Levante 1 #

ESY = cbind(ESY,c(2,1))
LEV = cbind(LEV,c(1,2))

# Real Zaragoza 3 - Sporting Gijon 0 #

ZAR = cbind(ZAR,c(3,0))
GIJ = cbind(GIJ,c(0,3))

## Gameweek 26 ##

# Levante 0 - Leganes 0 #

LEV = cbind(LEV,c(0,0))
LEG = cbind(LEG,c(0,0))

# Eldense 0 - Huesca 0 #

ELD = cbind(ELD,c(0,0))
HUE = cbind(HUE,c(0,0))

# Amorebieta 1 - Elche 0 #

AMR = cbind(AMR,c(1,0))
ELC = cbind(ELC,c(0,1))

# Sporting Gijon 1 - Oviedo 0 #

GIJ = cbind(GIJ,c(1,0))
OVI = cbind(OVI,c(0,1))

# Racing 2 - Espanyol 0 #

SAN = cbind(SAN,c(2,0))
ESY = cbind(ESY,c(0,2))

# Villarreal B 1 - Tenerife 0 #

VIB = cbind(VIB,c(1,0))
TNR = cbind(TNR,c(0,1))

# Alcorcon 1 - Andorra 0 #

ACO = cbind(ACO,c(1,0))
AND = cbind(AND,c(0,1))

# FC Cartagena 1 - Mirandes 0 #

CTG = cbind(CTG,c(1,0))
MIR = cbind(MIR,c(0,1))

# Eibar 1 - Real Zaragoza 0 #

EIB = cbind(EIB,c(1,0))
ZAR = cbind(ZAR,c(0,1))

# Burgos 2 - Racing Ferrol 0 #

BRG = cbind(BRG,c(2,0))
FER = cbind(FER,c(0,2))

# Valladolid 0 - Albacete 0 #

VLD = cbind(VLD,c(0,0))
ALB = cbind(ALB,c(0,0))

## Gameweek 27 ##

# Real Zaragoza 1 - FC Cartagena 2 #

ZAR = cbind(ZAR,c(1,2))
CTG = cbind(CTG,c(2,1))

# Andorra 1 - Villarreal B 1 #

AND = cbind(AND,c(1,1))
VIB = cbind(VIB,c(1,1))

# Oviedo 5 - Burgos 0 #

OVI = cbind(OVI,c(5,0))
BRG = cbind(BRG,c(0,5))

# Sporting Gijon 1 - Valladolid 1 #

GIJ = cbind(GIJ,c(1,1))
VLD = cbind(VLD,c(1,1))

# Espanyol 3 - Mirandes 0 #

ESY = cbind(ESY,c(3,0))
MIR = cbind(MIR,c(0,3))

# Albacete 2 - Racing 0 #

ALB = cbind(ALB,c(2,0))
SAN = cbind(SAN,c(0,2))

# Racing Ferrol 0 - Levante 0 #

FER = cbind(FER,c(0,0))
LEV = cbind(LEV,c(0,0))

# Leganes 3 - Alcorcon 0 #

LEG = cbind(LEG,c(3,0))
ACO = cbind(ACO,c(0,3))

# Huesca 0 - Amorebieta 0 #

HUE = cbind(HUE,c(0,0))
AMR = cbind(AMR,c(0,0))

# Elche 0 - Eibar 0 #

ELC = cbind(ELC,c(0,0))
EIB = cbind(EIB,c(0,0))

# Tenerife 1 - Eldense 0 #

TNR = cbind(TNR,c(1,0))
ELD = cbind(ELD,c(0,1))

## Gameweek 28 ##

# Valladolid 3 - Oviedo 0 #

VLD = cbind(VLD,c(3,0))
OVI = cbind(OVI,c(0,3))

# Racing 2 - Leganes 1 #

SAN = cbind(SAN,c(2,1))
LEG = cbind(LEG,c(1,2))

# Eibar 2 - Espanyol 3 #

EIB = cbind(EIB,c(2,3))
ESY = cbind(ESY,c(3,2))

# Villarreal B 0 - Real Zaragoza 0 #

VIB = cbind(VIB,c(0,0))
ZAR = cbind(ZAR,c(0,0))

# Eldense 2 - Racing Ferrol 0 #

ELD = cbind(ELD,c(2,0))
FER = cbind(FER,c(0,2))

# Alcorcon 1 - Tenerife 1 #

ACO = cbind(ACO,c(1,1))
TNR = cbind(TNR,c(1,1))

# Burgos 1 - Sporting Gijon 0 #

BRG = cbind(BRG,c(1,0))
GIJ = cbind(GIJ,c(0,1))

# FC Cartagena 0 - Elche 1 #

CTG = cbind(CTG,c(0,1))
ELC = cbind(ELC,c(1,0))

# Amorebieta 1 - Albacete 1 #

AMR = cbind(AMR,c(1,1))
ALB = cbind(ALB,c(1,1))

# Mirandes 0 - Huesca 3 #

MIR = cbind(MIR,c(0,3))
HUE = cbind(HUE,c(3,0))

## Gameweek 29 ##

# Sporting Gijon 2 - Albacete 1 #

GIJ = cbind(GIJ,c(2,1))
ALB = cbind(ALB,c(1,2))

# Eldense 2 - Villarreal B 0 #

ELD = cbind(ELD,c(2,0))
VIB = cbind(VIB,c(0,2))

# Espanyol 0 - Huesca 0 #

ESY = cbind(ESY,c(0,0))
HUE = cbind(HUE,c(0,0))

# Racing Ferrol 2 - Racing 2 #

FER = cbind(FER,c(2,2))
SAN = cbind(SAN,c(2,2))

# Oviedo 3 - Levante 2 #

OVI = cbind(OVI,c(3,2))
LEV = cbind(LEV,c(2,3))

# Burgos 3 - FC Cartagena 0 #

BRG = cbind(BRG,c(3,0))
CTG = cbind(CTG,c(0,3))

# Andorra 2 - Valladolid 1 #

AND = cbind(AND,c(2,1))
VLD = cbind(VLD,c(1,2))

# Tenerife 2 - Mirandes 1 #

TNR = cbind(TNR,c(2,1))
MIR = cbind(MIR,c(1,2))

# Real Zaragoza 0 - Amorebieta 1 #

ZAR = cbind(ZAR,c(0,1))
AMR = cbind(AMR,c(1,0))

# Leganes 0 - Eibar 2 #

LEG = cbind(LEG,c(0,2))
EIB = cbind(EIB,c(2,0))

# Elche 3 - Alcorcon 0 #

ELC = cbind(ELC,c(3,0))
ACO = cbind(ACO,c(0,3))

## Gameweek 30 ##

# Huesca 2 - Andorra 0 #

HUE = cbind(HUE,c(2,0))
AND = cbind(AND,c(0,2))

# Albacete 1 - Oviedo 2 #

ALB = cbind(ALB,c(1,2))
OVI = cbind(OVI,c(2,1))

# Mirandes 3 - Eldense 1 #

MIR = cbind(MIR,c(3,1))
ELD = cbind(ELD,c(1,3))

# Valladolid 2 - Real Zaragoza 0 #

VLD = cbind(VLD,c(2,0))
ZAR = cbind(ZAR,c(0,2))

# FC Cartagena 2 - Racing Ferrol 1 #

CTG = cbind(CTG,c(2,1))
FER = cbind(FER,c(1,2))

# Racing 4 - Tenerife 2 #

SAN = cbind(SAN,c(4,2))
TNR = cbind(TNR,c(2,4))

# Levante 1 - Sporting Gijon 0 #

LEV = cbind(LEV,c(1,0))
GIJ = cbind(GIJ,c(0,1))

# Villarreal B 0 - Elche 1 #

VIB = cbind(VIB,c(0,1))
ELC = cbind(ELC,c(1,0))

# Eibar 0 - Burgos 1 #

EIB = cbind(EIB,c(0,1))
BRG = cbind(BRG,c(1,0))

# Alcorcon 1 - Espanyol 1 #

ACO = cbind(ACO,c(1,1))
ESY = cbind(ESY,c(1,1))

# Amorebieta 0 - Leganes 1 #

AMR = cbind(AMR,c(0,1))
LEG = cbind(LEG,c(1,0))

# Levante 0 - Andorra 0 #

LEV = cbind(LEV,c(0,0))
AND = cbind(AND,c(0,0))

## Gameweek 31 ##

# Eldense 0 - FC Cartagena 0 #

ELD = cbind(ELD,c(0,0))
CTG = cbind(CTG,c(0,0))

# Burgos 1 - Levante 1 #

BRG = cbind(BRG,c(1,1))
LEV = cbind(LEV,c(1,1))

# Eibar 2 - Villarreal B 0 #

EIB = cbind(EIB,c(2,0))
VIB = cbind(VIB,c(0,2))

# Oviedo 1 - Racing 1 #

OVI = cbind(OVI,c(1,1))
SAN = cbind(SAN,c(1,1))

# Tenerife 0 - Huesca 0 #

TNR = cbind(TNR,c(0,0))
HUE = cbind(HUE,c(0,0))

# Sporting Gijon 1 - Alcorcon 0 #

GIJ = cbind(GIJ,c(1,0))
ACO = cbind(ACO,c(0,1))

# Leganes 4 - Mirandes 0 #

LEG = cbind(LEG,c(4,0))
MIR = cbind(MIR,c(0,4))

# Racing Ferrol 2 - Valladolid 0 #

FER = cbind(FER,c(2,0))
VLD = cbind(VLD,c(0,2))

# Elche 3 - Albacete 2 #

ELC = cbind(ELC,c(3,2))
ALB = cbind(ALB,c(2,3))

# Real Zaragoza 0 - Espanyol 1 #

ZAR = cbind(ZAR,c(0,1))
ESY = cbind(ESY,c(1,0))

# Andorra 0 - Amorebieta 1 #

AND = cbind(AND,c(0,1))
AMR = cbind(AMR,c(1,0))

## Gameweek 32 ##

# Alcorcon 1 - Oviedo 0 #

ACO = cbind(ACO,c(1,0))
OVI = cbind(OVI,c(0,1))

# Villarreal B 1 - Leganes 2 #

VIB = cbind(VIB,c(1,2))
LEG = cbind(LEG,c(2,1))

# FC Cartagena 1 - Andorra 0 #

CTG = cbind(CTG,c(1,0))
AND = cbind(AND,c(0,1))

# Espanyol 1 - Tenerife 1 #

ESY = cbind(ESY,c(1,1))
TNR = cbind(TNR,c(1,1))

# Amorebieta 3 - Sporting Gijon 1 #

AMR = cbind(AMR,c(3,1))
GIJ = cbind(GIJ,c(1,3))

# Valladolid 3 - Eibar 1 #

VLD = cbind(VLD,c(3,1))
EIB = cbind(EIB,c(1,3))

# Huesca 3 - Burgos 0 #

HUE = cbind(HUE,c(3,0))
BRG = cbind(BRG,c(0,3))

# Mirandes 0 - Real Zaragoza 0 #

MIR = cbind(MIR,c(0,0))
ZAR = cbind(ZAR,c(0,0))

# Levante 3 - Elche 2 #

LEV = cbind(LEV,c(3,2))
ELC = cbind(ELC,c(2,3))

# Racing 2 - Eldense 1 #

SAN = cbind(SAN,c(2,1))
ELD = cbind(ELD,c(1,2))

# Albacete 1 - Racing Ferrol 1 #

ALB = cbind(ALB,c(1,1))
FER = cbind(FER,c(1,1))

## Gameweek 33 ##

# Burgos 0 - Espanyol 0 #

BRG = cbind(BRG,c(0,0))
ESY = cbind(ESY,c(0,0))

# Valladolid 0 - Levante 0 #

VLD = cbind(VLD,c(0,0))
LEV = cbind(LEV,c(0,0))

# Eibar 5 - Eldense 1 #

EIB = cbind(EIB,c(5,1))
ELD = cbind(ELD,c(1,5))

# Andorra 1 - Mirandes 0 #

AND = cbind(AND,c(1,0))
MIR = cbind(MIR,c(0,1))

# Leganes 0 - FC Cartagena 0 #

LEG = cbind(LEG,c(0,0))
CTG = cbind(CTG,c(0,0))

# Albacete 1 - Huesca 1 #

ALB = cbind(ALB,c(1,1))
HUE = cbind(HUE,c(1,1))

# Sporting Gijon 2 - Racing 3 #

GIJ = cbind(GIJ,c(2,3))
SAN = cbind(SAN,c(3,2))

# Alcorcon 1 - Amorebieta 1 #

ACO = cbind(ACO,c(1,1))
AMR = cbind(AMR,c(1,1))

# Racing Ferrol 1 - Elche 0 #

FER = cbind(FER,c(1,0))
ELC = cbind(ELC,c(0,1))

# Real Zaragoza 3 - Tenerife 1 #

ZAR = cbind(ZAR,c(3,1))
TNR = cbind(TNR,c(1,3))

# Oviedo 2 - Villarreal B 1 #

OVI = cbind(OVI,c(2,1))
VIB = cbind(VIB,c(1,2))

## Gameweek 34 ##

# Elche 0 - Oviedo 2 #

ELC = cbind(ELC,c(0,2))
OVI = cbind(OVI,c(2,0))

# Amorebieta 3 - Racing Ferrol 1 #

AMR = cbind(AMR,c(3,1))
FER = cbind(FER,c(1,3))

# Eldense 0 - Andorra 2 #

ELD = cbind(ELD,c(0,2))
AND = cbind(AND,c(2,0))

# Levante 2 - Real Zaragoza 1 #

LEV = cbind(LEV,c(2,1))
ZAR = cbind(ZAR,c(1,2))

# Huesca 0 - Leganes 0 #

HUE = cbind(HUE,c(0,0))
LEG = cbind(LEG,c(0,0))

# Mirandes 1 - Sporting Gijon 3 #

MIR = cbind(MIR,c(1,3))
GIJ = cbind(GIJ,c(3,1))

# Villarreal B 2 - Burgos 1 #

VIB = cbind(VIB,c(2,1))
BRG = cbind(BRG,c(1,2))

# Espanyol 2 - Albacete 1 #

ESY = cbind(ESY,c(2,1))
ALB = cbind(ALB,c(1,2))

# Tenerife 2 - Eibar 1 #

TNR = cbind(TNR,c(2,1))
EIB = cbind(EIB,c(1,2))

# FC Cartagena 0 - Valladolid 2 #

CTG = cbind(CTG,c(0,2))
VLD = cbind(VLD,c(2,0))

# Racing 0 - Alcorcon 1 #

SAN = cbind(SAN,c(0,1))
ACO = cbind(ACO,c(1,0))

## Gameweek 35 ##

# Leganes 0 - Espanyol 0 #

LEG = cbind(LEG,c(0,0))
ESY = cbind(ESY,c(0,0))

# Sporting Gijon 1 - FC Cartagena 0 #

GIJ = cbind(GIJ,c(1,0))
CTG = cbind(CTG,c(0,1))

# Valladolid 1 - Eldense 0 #

VLD = cbind(VLD,c(1,0))
ELD = cbind(ELD,c(0,1))

# Levante 1 - Amorebieta 2 #

LEV = cbind(LEV,c(1,2))
AMR = cbind(AMR,c(2,1))

# Oviedo 1 - Mirandes 1 #

OVI = cbind(OVI,c(1,1))
MIR = cbind(MIR,c(1,1))

# Andorra 0 - Eibar 2 #

AND = cbind(AND,c(0,2))
EIB = cbind(EIB,c(2,0))

# Albacete 1 - Tenerife 0 #

ALB = cbind(ALB,c(1,0))
TNR = cbind(TNR,c(0,1))

# Burgos 2 - Racing 1 #

BRG = cbind(BRG,c(2,1))
SAN = cbind(SAN,c(1,2))

# Real Zaragoza 1 - Elche 1 #

ZAR = cbind(ZAR,c(1,1))
ELC = cbind(ELC,c(1,1))

# Racing Ferrol 2 - Huesca 1 #

FER = cbind(FER,c(2,1))
HUE = cbind(HUE,c(1,2))

# Alcorcon 1 - Villarreal B 0 #

ACO = cbind(ACO,c(1,0))
VIB = cbind(VIB,c(0,1))

## Gameweek 36 ##

# Tenerife 0 - Leganes 0 #

TNR = cbind(TNR,c(0,0))
LEG = cbind(LEG,c(0,0))

# Amorebieta 0 - Valladolid 3 #

AMR = cbind(AMR,c(0,3))
VLD = cbind(VLD,c(3,0))

# Villarreal B 1 - Racing Ferrol 0 #

VIB = cbind(VIB,c(1,0))
FER = cbind(FER,c(0,1))

# Racing 0 - Levante 0 #

SAN = cbind(SAN,c(0,0))
LEV = cbind(LEV,c(0,0))

# Elche 2 - Sporting Gijon 1 #

ELC = cbind(ELC,c(2,1))
GIJ = cbind(GIJ,c(1,2))

# Huesca 1 - Real Zaragoza 2 #

HUE = cbind(HUE,c(1,2))
ZAR = cbind(ZAR,c(2,1))

# Espanyol 1 - Andorra 1 #

ESY = cbind(ESY,c(1,1))
AND = cbind(AND,c(1,1))

# Eibar 2 - Alcorcon 0 #

EIB = cbind(EIB,c(2,1))
ACO = cbind(ACO,c(1,2))

# Eldense 0 - Albacete 1 #

ELD = cbind(ELD,c(0,1))
ALB = cbind(ALB,c(1,0))

# Mirandes 2 - Burgos 1 #

MIR = cbind(MIR,c(2,1))
BRG = cbind(BRG,c(1,2))

# FC Cartagena 2 - Oviedo 0 #

CTG = cbind(CTG,c(2,0))
OVI = cbind(OVI,c(0,2))

## Gameweek 37 ##

# Andorra 1 - Racing 1 #

AND = cbind(AND,c(1,1))
SAN = cbind(SAN,c(1,1))

# Burgos 2 - Amorebieta 2 #

BRG = cbind(BRG,c(2,2))
AMR = cbind(AMR,c(2,2))

# Leganes 1 - Real Zaragoza 1 #

LEG = cbind(LEG,c(1,1))
ZAR = cbind(ZAR,c(1,1))

# Elche 2 - Espanyol 2 #

ELC = cbind(ELC,c(2,2))
ESY = cbind(ESY,c(2,2))

# Sporting Gijon 0 - Villarreal B 3 #

GIJ = cbind(GIJ,c(0,3))
VIB = cbind(VIB,c(3,0))

# Oviedo 0 - Tenerife 1 #

OVI = cbind(OVI,c(0,1))
TNR = cbind(TNR,c(1,0))

# Alcorcon 0 - Eldense 0 #

ACO = cbind(ACO,c(0,0))
ELD = cbind(ELD,c(0,0))

# Levante 0 - FC Cartagena 1 #

LEV = cbind(LEV,c(0,1))
CTG = cbind(CTG,c(1,0))

# Valladolid 1 - Huesca 0 #

VLD = cbind(VLD,c(1,0))
HUE = cbind(HUE,c(0,1))

# Albacete 2 - Eibar 1 #

ALB = cbind(ALB,c(2,1))
EIB = cbind(EIB,c(1,2))

# Racing Ferrol 0 - Mirandes 2 #

FER = cbind(FER,c(0,2))
MIR = cbind(MIR,c(2,0))

## Gameweek 38 ##

# Villarreal B 0 - Levante 3 #

VIB = cbind(VIB,c(0,3))
LEV = cbind(LEV,c(3,0))

# Mirandes 0 - Valladolid 1 #

MIR = cbind(MIR,c(0,1))
VLD = cbind(VLD,c(1,0))

# Huesca 0 - Oviedo 2 #

HUE = cbind(HUE,c(0,2))
OVI = cbind(OVI,c(2,0))

# Racing 3 - Elche 1 #

SAN = cbind(SAN,c(3,1))
ELC = cbind(ELC,c(1,3))

# FC Cartagena 1 - Alcorcon 0 #

CTG = cbind(CTG,c(1,0))
ACO = cbind(ACO,c(0,1))

# Eibar 5 - Amorebieta 0 #

EIB = cbind(EIB,c(5,0))
AMR = cbind(AMR,c(0,5))

# Espanyol 0 - Sporting Gijon 0 #

ESY = cbind(ESY,c(0,0))
GIJ = cbind(GIJ,c(0,0))

# Andorra 0 - Albacete 1 #

AND = cbind(AND,c(0,1))
ALB = cbind(ALB,c(1,0))

# Eldense 1 - Leganes 2 #

ELD = cbind(ELD,c(1,2))
LEG = cbind(LEG,c(2,1))

# Real Zaragoza 1 - Burgos 3 #

ZAR = cbind(ZAR,c(1,3))
BRG = cbind(BRG,c(3,1))

# Tenerife 2 - Racing Ferrol 0 #

TNR = cbind(TNR,c(2,0))
FER = cbind(FER,c(0,2))

## Gameweek 39 ##

# Burgos 1 - Eldense 2 #

BRG = cbind(BRG,c(1,2))
ELD = cbind(ELD,c(2,1))

# Racing 1 - Mirandes 0 #

SAN = cbind(SAN,c(1,0))
MIR = cbind(MIR,c(0,1))

# Sporting Gijon 5 - Andorra 2 #

GIJ = cbind(GIJ,c(5,2))
AND = cbind(AND,c(2,5))

# Racing Ferrol 2 - Alcorcon 1 #

FER = cbind(FER,c(2,1))
ACO = cbind(ACO,c(1,2))

# Valladolid 0 - Espanyol 0 #

VLD = cbind(VLD,c(0,0))
ESY = cbind(ESY,c(0,0))

# Levante 2 - Eibar 2 #

LEV = cbind(LEV,c(2,2))
EIB = cbind(EIB,c(2,2))

# Amorebieta 2 - Villarreal B 0 #

AMR = cbind(AMR,c(2,0))
VIB = cbind(VIB,c(0,2))

# Oviedo 1 - Real Zaragoza 0 #

OVI = cbind(OVI,c(1,0))
ZAR = cbind(ZAR,c(0,1))

# Albacete 1 - Leganes 0 #

ALB = cbind(ALB,c(1,0))
LEG = cbind(LEG,c(0,1))

# FC Cartagena 2 - Tenerife 0 #

CTG = cbind(CTG,c(2,0))
TNR = cbind(TNR,c(0,2))

# Elche 0 - Huesca 3 #

ELC = cbind(ELC,c(0,3))
HUE = cbind(HUE,c(3,0))

## Gameweek 40 ##

# Mirandes 1 - Elche 1 #

MIR = cbind(MIR,c(1,1))
ELC = cbind(ELC,c(1,1))

# Andorra 1 - Burgos 0 #

AND = cbind(AND,c(1,0))
BRG = cbind(BRG,c(0,1))

# Leganes 2 - Sporting Gijon 1 #

LEG = cbind(LEG,c(2,1))
GIJ = cbind(GIJ,c(1,2))

# Huesca 0 - Racing 3 #

HUE = cbind(HUE,c(0,3))
SAN = cbind(SAN,c(3,0))

# Eldense 0 - Levante 0 #

ELD = cbind(ELD,c(0,0))
LEV = cbind(LEV,c(0,0))

# Tenerife 0 - Amorebieta 1 #

TNR = cbind(TNR,c(0,1))
AMR = cbind(AMR,c(1,0))

# Eibar 1 - FC Cartagena 0 #

EIB = cbind(EIB,c(1,0))
CTG = cbind(CTG,c(0,1))

# Alcorcon 1 - Valladolid 1 #

ACO = cbind(ACO,c(1,1))
VLD = cbind(VLD,c(1,1))

# Real Zaragoza 2 - Racing Ferrol 2 #

ZAR = cbind(ZAR,c(2,2))
FER = cbind(FER,c(2,2))

# Villarreal B 2 - Albacete 2 #

VIB = cbind(VIB,c(2,2))
ALB = cbind(ALB,c(2,2))

# Espanyol 2 - Oviedo 1 #

ESY = cbind(ESY,c(2,1))
OVI = cbind(OVI,c(1,2))

## Gameweek 41 ##

# Sporting Gijon 1 - Eibar 0 #

GIJ = cbind(GIJ,c(1,0))
EIB = cbind(EIB,c(0,1))

# Albacete 2 - Mirandes 2 #

ALB = cbind(ALB,c(2,2))
MIR = cbind(MIR,c(2,2))

# Levante 2 - Alcorcon 2 #

LEV = cbind(LEV,c(2,2))
ACO = cbind(ACO,c(2,2))

# Racing Ferrol 2 - Leganes 2 #

FER = cbind(FER,c(2,2))
LEG = cbind(LEG,c(2,2))

# FC Cartagena 0 - Huesca 2 #

CTG = cbind(CTG,c(0,2))
HUE = cbind(HUE,c(2,0))

# Valladolid 3 - Villarreal B 2 #

VLD = cbind(VLD,c(3,2))
VIB = cbind(VIB,c(2,3))

# Elche 1 - Eldense 2 #

ELC = cbind(ELC,c(1,2))
ELD = cbind(ELD,c(2,1))

# Amorebieta 0 - Espanyol 0 #

AMR = cbind(AMR,c(0,0))
ESY = cbind(ESY,c(0,0))

# Oviedo 3 - Andorra 0 #

OVI = cbind(OVI,c(3,0))
AND = cbind(AND,c(0,3))

# Racing 0 - Real Zaragoza 2 #

SAN = cbind(SAN,c(0,2))
ZAR = cbind(ZAR,c(2,0))

# Burgos 1 - Tenerife 1 #

BRG = cbind(BRG,c(1,1))
TNR = cbind(TNR,c(1,1))

## Gameweek 42 ##

# Huesca 0 - Levante 0 #

HUE = cbind(HUE,c(0,0))
LEV = cbind(LEV,c(0,0))

# Alcorcon 1 - Burgos 1 #

ACO = cbind(ACO,c(1,1))
BRG = cbind(BRG,c(1,1))

# Andorra 1 - Racing Ferrol 0 #

AND = cbind(AND,c(1,0))
FER = cbind(FER,c(0,1))

# Tenerife 2 - Valladolid 1 #

TNR = cbind(TNR,c(2,1))
VLD = cbind(VLD,c(1,2))

# Eibar 4 - Oviedo 3 #

EIB = cbind(EIB,c(4,3))
OVI = cbind(OVI,c(3,4))

# Leganes 2 - Elche 0 #

LEG = cbind(LEG,c(2,0))
ELC = cbind(ELC,c(0,2))

# Mirandes 1 - Amorebieta 0 #

MIR = cbind(MIR,c(1,0))
AMR = cbind(AMR,c(0,1))

# Espanyol 3 - FC Cartagena 0 #

ESY = cbind(ESY,c(3,0))
CTG = cbind(CTG,c(0,3))

# Eldense 0 - Sporting Gijon 1 #

ELD = cbind(ELD,c(0,1))
GIJ = cbind(GIJ,c(1,0))

# Villarreal B 1 - Racing 0 #

VIB = cbind(VIB,c(1,0))
SAN = cbind(SAN,c(0,1))

# Real Zaragoza 1 - Albacete 1 #

ZAR = cbind(ZAR,c(1,1))
ALB = cbind(ALB,c(1,1))

### 3. Complete table ###

for (x in teams)
{
  r = which(table$Team==x)
  X = eval(parse(text=x))
  for (i in 1:ncol(X))
  {
    table$GP[r] = table$GP[r] + 1
    if (X[1,i] - X[2,i] > 0)
    {
      table$W[r] = table$W[r] + 1
      table$Pts[r] = table$Pts[r] + 3
    }
    else if (X[1,i] == X[2,i])
    {
      table$D[r] = table$D[r] + 1
      table$Pts[r] = table$Pts[r] + 1
    }
    else
    {
      table$L[r] = table$L[r] + 1
    }
  }
  table$GF[r] = sum(X[1,])
  table$GA[r] = sum(X[2,])
  table$GD[r] = table$GF[r] - table$GA[r]
}

table <- table[order(-table$Pts,-table$GD,-table$GF,table$Team),]
row.names(table) <- 1:nrow(table)

table