soccermatics (version 0.9.0)

soccerTransform: Normalises x,y-coordinates to metres units for use with soccermatics functions

Description

Normalises x,y-coordinates from between any arbitrary bounds to metre units bounded by [0 < x < pitchLength, 0 < y < pitchWidth]

Usage

soccerTransform(dat, xMin, xMax, yMin, yMax, lengthPitch = 105,
  widthPitch = 68, method = c("manual", "statsbomb", "opta"))

Arguments

dat

dataframe containing unnormalised x,y-coordinates named `x` and `y`

xMin, xMax, yMin, yMax

range of x,y-coordinates possible in the raw dataset

pitchLength, pitchWidth

length, width of pitch in metres

Value

a dataframe

See Also

soccerTransformSB readily transforms data from StatsBomb for use with soccermatics

soccerTransformSB for transforming data from StatsBomb

Examples

# NOT RUN {
# Three examples with true pitch dimesions (in metres):
lengthPitch <- 101
widthPitch <- 68

# Example 1. Opta-style -------------------------------------------------------
# limits = [0 < x < 100, 0 < y < 100]
# centre of pitch = [50,50]

opta_df <- data.frame(t = 1:12,
                 x = c(50,55,61,66,62,58,51,44,45,42,41,32),
                 y = c(50,48,47,40,42,45,49,51,59,75,88,100))

opta_df <- soccerTransform(opta_df, 0, 100, 0, 100, lengthPitch, widthPitch)

soccerPath(opta_df, lengthPitch = lengthPitch, widthPitch = widthPitch)


# Example 2. StrataBet-style --------------------------------------------------
# limits = [0 < x < 420, -136 < y < 136]
# centre of pitch = [210,0]

stratabet_df <- data.frame(t = 1:12,
                 x = c(210,222,201,192,178,170,143,122,104,91,75,60),
                 y = c(0,-5,-20,-12,-8,-2,4,8,13,20,30,45))

stratabet_df <- soccerTransform(stratabet_df, 0, 420, -136, 136, lengthPitch, widthPitch)

soccerPath(stratabet_df, lengthPitch = lengthPitch, widthPitch = widthPitch)


# Example 3. Other ------------------------------------------------------------
# limits = [-5250 < x < 5250, -3400 < y < 3400]
# centre of pitch = [0,0]

xMin <- -5250
xMax <- 5250
yMin <- -3400
yMax <- 3400

df <- data.frame(x = c(0,-452,-982,-1099,-1586,-2088,-2422,-2999,-3200,-3857),
                 y = c(0,150,300,550,820,915,750,620,400,264))

df <- soccerTransform(df, -5250, 5250, -3400, 3400, lengthPitch, widthPitch)

soccerPath(df, lengthPitch = lengthPitch, widthPitch = widthPitch)

# }