From 229618b91ba796452677b53e58612bb67c161842 Mon Sep 17 00:00:00 2001 From: Brian Hicks Date: Mon, 12 Oct 2020 10:47:14 -0500 Subject: [PATCH] use average instead of median --- src/League.elm | 19 ++++++++----------- 1 file changed, 8 insertions(+), 11 deletions(-) diff --git a/src/League.elm b/src/League.elm index 56ca795..c546aae 100644 --- a/src/League.elm +++ b/src/League.elm @@ -93,18 +93,15 @@ getPlayer name (League league) = addPlayer : Player -> League -> League addPlayer player (League league) = let - ratings = - Dict.values league.players - |> List.map .rating - |> List.sort - - medianishRating = - ratings - |> List.drop (List.length ratings // 2) - |> List.head - |> Maybe.withDefault Elo.initialRating + initialRating = + case Dict.values league.players |> List.map .rating of + [] -> + Elo.initialRating + + nonEmpty -> + List.sum nonEmpty // List.length nonEmpty in - League { league | players = Dict.insert player.name (Player.setRating medianishRating player) league.players } + League { league | players = Dict.insert player.name (Player.setRating initialRating player) league.players } {-| -}