Get advantage matrix from a mELO model

Source: R/get_adv_mat.R

Returns the player to player advantage/disadvantage matrix for a mELO model. the matrix is calculated as \(C \Omega C'\).

get_adv_mat(model)

Arguments

model

a mELO_rating model created with a mELO() function.

Value

a matrix

Examples

# rock paper scissors model
rps_model <- mELO(rps_df, k=1)
get_adv_mat(rps_model)
#>              PAPER      ROCK  SCISSORS
#> PAPER        0.000  1135.679 -1171.511
#> ROCK     -1135.679     0.000  1139.236
#> SCISSORS  1171.511 -1139.236     0.000

# rock paper scissors fire water model
rpsfw_model <- mELO(rpsfw_df, k=2)
get_adv_mat(rpsfw_model)
#>               FIRE     PAPER      ROCK  SCISSORS     WATER
#> FIRE         0.000  1117.095  1054.268  1075.716 -1299.302
#> PAPER    -1117.095     0.000  1234.890 -1328.231  1068.391
#> ROCK     -1054.268 -1234.890     0.000  1451.012  1132.866
#> SCISSORS -1075.716  1328.231 -1451.012     0.000  1191.234
#> WATER     1299.302 -1068.391 -1132.866 -1191.234     0.000