Ratings berechnen

[venice2]

Ich habe den Eindruck das bei meiner Berechnung irgend etwas nicht stimmig ist.

popularity: 46.253
vote_average: 6.9
vote_count: 9012

Meine Berechnung:

Delphi-Quellcode:

{$REGION 'ComputeStarRate'}

  function TTMDBInfo.ComputeStarRate: longint;
  var
    nRate: longint;
    rating: single;
  begin

    rating := gM.vote_average + (gM.popularity / 150.0);
    nRate := min(Max(round(rating * 15), 0), 150);
    result := nRate;
  end;
{$ENDREGION}

150 ist die weite des Bitmap meiner Sterne die ich als Rating benutze.

Müßte ich nicht eigentlich auch noch den Vote Count mit einbeziehen um einen korrekten wert zu ermitteln?
Bei IMDB sieht das mitunter auch unverständlich aus.

Das Rating bei diesen werten sieht so aus wie auf dem Anhang. Es sollte dabei ein arithmetischer Mittelwert herum kommen.
Was denkt ihr?