Hi Ahmed,

Try

SetOptions[EvaluationNotebook[],StyleDefinitions->"Default.nb"]

No idea why that would fix things. I tried it on WolframCloud, and it seemed to fix it. Still, I don't see why that would fix the desktop. As I said, it works for me on my laptop as is.

@Michael, this is very cool post, thanks for sharing! These thoughts crossed my mind imidiately:

• Are not there some graphical means of visualization we can invent for this? I am thinking about it myself. Tables might be less easy to grasp.

• Running your code on Mac desktop V14.1 I got the following result (some other folks reported issues too):

Apparently Dynamic[] things don't behave well when import into this community site. I suppose it's the dependence on global variables (hence the error showing medalassoc hasn't been initialized). Instead of trying to guess how to fix it, here's an image of the output rankings: