Wolfram Function Repository

Instant-use add-on functions for the Wolfram Language

Function Repository Resource:

 RankChart

Source Notebook

Create a ranking chart

Contributed by: Kotaro Okazaki

ResourceFunction["RankChart"][{list1,list2.…}]

makes a chart of the transition of the ranking lists list1,list2.… .

Details and Options

listi is a list of integers with the first as 1, the second as 2, and so on.
ResourceFunction["RankChart"] has the following options:
"Names""Names"name of each element of a listi"BottomTicks"ticks of the bottom of a chart"Colors"Automaticcolor of each line. list them in order from first to last in the final ranking"PointSize"0.04point size"Thickness"0.02thickness of a linename of each element of a listi
"BottomTicks"ticks of the bottom of a chart
"Colors"Automaticcolor of each line. list them in order from first to last in the final ranking
"PointSize"0.04point size
"Thickness"0.02thickness of a line
ResourceFunction["RankChart"] also has the same options as ListPlot.

Examples

Basic Examples (3) 

Show a ranking chart:

In[1]:=
ranking = {{2, 4, 3, 1}, {1, 3, 4, 2}, {1, 2, 3, 4}}; ResourceFunction["RankChart"][ranking]
Out[2]=

Show a ranking chart of permutations:

In[3]:=
ResourceFunction["RankChart"][Permutations[Range[3]]]
Out[3]=

Ties are allowed in rankings:

In[4]:=
ResourceFunction[ "RankChart"][{{3, 2, 1}, {1, 2, 2}, {2, 1, 2}, {2, 3, 1}, {1, 1, 2}, {3, 2, 1}}]
Out[4]=

Options (3) 

Add labels to a ranking chart:

In[5]:=
ranking = {{2, 4, 3, 1}, {1, 3, 4, 2}, {1, 2, 3, 4}}; ResourceFunction["RankChart"][ranking, "Names" -> {\!\(\* GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztWnlcVWUaPndDXNJMHdOyJpdqUkfTMpVNCEGQTS4ojdOUqFmmFppTNjra r2XSRBZBFqHFhUUzcEMTcSnX1DILK7VfmmYqClyCXLj4zPt+37kLCIgoLuUf L/fcyznn+77nPM+7feeB8JeCn9MqijLJkf4Ej3jVfeLEEVOMd9KX0AmTXhgz YfQonwmvjB4zemLfcB392IPMi0xPpmQE4bZVNk3mkBs+h5vRbuNyc+OiIdNl BgrT3AzzuQlwYSzE8aJQafa//Qlx0Waq618UAof0IfjPrq7CGtEx46Ol/2lv ED43AhfWiZ7Xm0ZjLwyBb64zvjrWEihThH31S0v45rnQ/4g7acHi3OutreuN i1UftOaHsr2Q8f29QCnh8ZuCC0VaYXyMUg3Sf7gPXbIH0blDK1/7B8LFqgnS TFP6Pm1XN5iKHAQ/Kor1ZFpcLNYIMxeRFevE//icabseQRNx7dDrpq2GxsWm GSOUxSEYsqEv8o/fCfxOnChmjugIBx3KC3W4cEYaH5uZO/QJk0bgk3+8BYI3 ONE9jKq2AqC9RXERvGcfumAouq7wRNbBe6yaOa/iwNgIjC6QmVW7oFhxO0/n 8LkoUcS1WQfvRdeVnsIvKekNp62GwIV5ruH50tybL/HDW3seRhmvjdZVTjzg tQp8CINykwH5+zsgO68nUrKckJLtjOV0nJ/fgbRlkDiVSnz4WuZOWZEeb375 MFos9Rd+qiG0dS1xseRmyuJgwfewTX1x8MQdMs6wZoQ+NGKtx460wvSUQHQf 9V/oBsVCcUuE4pIExTlZHGvpt27h0/DG/AA69y5xTYVVW5JPB040Q9jmPlJb NKaOtHWt4ta1wEXiESA1Q8/v0VUeyPmxreREieSIuZD8KmvhnILodC+0CZwt MfCIhzIoGjrfOdAPngMdGx3zb4pHHBSn+WgdNBvRGQPFtXwPvpfgjqqtnEPt 0Hv1kzT2MDGHa6Gtq8XFymHCo9XHfojc2wXn1Fgi8KD4ws+5gtZwrsQRYdNH Q+mXAsUrhnCIhNYnChrGoIrxb/w/PofPVfqnIOyNMThnaiTuVaHeW+DDOqMx I/c+hNY0B84JNRlXp6364mLliIgPRjy7uTcOn2gi8Liozpc/KzjuUgw2lzog YMqLUPrOh8FvNjS05qpY1GR8rsEvUuAZNGU8zGUGlNM9K9S4bhmLxz5ysilG fN7LGv/qW2/VBxdrnCGO9M1xQ95Pd1s1w3mZZb5izmfoeV5U8FoC5a5OqXAk /eh8Y0gv0vSDY8V3rU9MtbyxN8ZT6ZeKyXEh0mefseU8POYFi7YIn42H/4L+ awbInDldxvWGwsWKPY3Vdpkv4vZ1gdmktcYZs11uJjAhP4DzCtZ+1hFKH9KC 23tQXMl3uNKzd2H/Mouwepe+06cHffeOglbFTOPDPKmMFR/rfeh6j3nYvruL 8Dec69iPabbLmc0leppjZ9z9sa+IjaytuvqeuuBivR/lqlriyfPbeuGXgsZq rmrjcVXjOZrpnLhlszAiJg+T09bg9SV5mLF0E6anb0ZEah7GRK+Hz5Rl6B6+ GI0Hk591I8ycCStP+hyo+l8fGzbslxXXRPj8e5zARfjzasYuF7yVcf3YKUe8 sOVRaLgeW2TRVu341IaLLVcNFhxxW+uGLUfayLhrkrytbk7S6DkW0nnnewI4 i+zCDfi0eAtWFm3COtNWLC/aiI2/70D0scUoQiF2FRzA5gM/4q1PNiP8f+tw X2gqHnz2fRiIO4pXFOERa8cb8scUx7+jvIfjtbmWeQjumKS2eO5un7rWqR6t DhdrHpIhc7MOn/giJf8B4qZG1YyuUj1TPVf0uEjn7vnmabyTtg8RyZ9i+Lur Meyt5TC+vRz/jFyNcUk5eCVjFRZs3Y2Pf9iJL4q/xariz5B5MhcbDucja/v3 CJ66ChoP8tGuM6XGfGQcU5zni3jPfobz5trmYuG0xQemfvtXWpOPxCej+py5 er4EilhnIH/10vaeKDjjKJ9LsbZGzVzynDinpTkPmfo0+ZBE9Bj9IfnMd8T6 FJdZ0rewjxlAHHgyCm2NSXAan44JCbmYuX4dUg+tRVbBJuSd2oPFW7+B/6vZ dO1soS9Hf+IM5YDD3xwJlLP/rR2XytqScevUmUZ4eXsPWqPU1uVwYa4YyAYS 33b+3EpqpkS9p+nyY9v7FsZyQMQr0LknEvfnCC2IWCR8a6zws8J3sLEvGUB+ 2XkmDJ4x6PNCGsZ9sAKxX65F6q8rkFuwCwlr9qBz2PuEz7vEoUS4RUy+rI5q wseirR2USw9c5woHzndqwEXm8EYYKX8XdRvZWbW2vZJxBXeLpOYeH/sqFPd5 xP1oa2zRqDh0GJ6CZkFxwn+I2EPGWhFxic5x9I3D3cHJGDV3JWL2rhIayzn0 NUKmE3f6xKLPuNfEGDzWlc6P13SWOa2uc9jGPtCIWiKwRr44kHnnumDnUZUv JqXO+rHhIvni+nIE8SBB5vaEhWaQjMGMRfunktAkME7yhszBLxaNA+ZWzmO8 6DqnWXiQeDIxfSVSfs5B7ultCI/ahCfGjieXLnPf+vKFNeG1zqVWvlgtM0ho zkA+O2IH+ZfTtphcV+5wXsHaH/5muPAvBoqvrUPmoX0Y1USD1FyXteOtcoWO 2/0jGR2fSSV/E2nN8xhDzmfYr2jcohAwbSlSv1uH1ae/wb7vEwgTzq/1deaI 8C/0vArIv0Ts6EF4sH8x1jlO2/qNQ3Ffli9S8ztKjH9TrP7rsn63QkFkmicM A1LQ0hgDl0kZ0BIOTQPjRZ6rsWoqCq1DE9BuWBK0XtHoPXah/L1SLUA4+dJx 35noOHwedh4spPg/BeYzjIuhbvGI+6MUU1Py1Xi0aKiIMXWPR1XyF7U/77bW FVt+bmPVVm35i/C7xPGv97UjDnyAdqQZxf09wZFOz7yPuwgHrZddzUjHLY3M q7kw+MZeiouoA2LR68VFcCS+dR+1ECePdRL1dUVRzfGoUv5yuBXlL260lmGi 536l+Uv1+Yy/rMModo/d1hPHVW1Z9FotNqIO0MB7MtWLLonQ+5Fu6Lnf81Sy 9CkelId423BpERyPrqM/krmu6nP4d8v/Fc8oDJjEeXEqBr8+HhdKa45F9rXk 8QJHPL+1F7Rpsi9Ul1qyfvVRCNotG4x5+zpVqY+q8TGUq++gWobjKtc2/Nzv oBjEn39/biHxI1b6G1p3s6B4dKIcl/1Lc8KocUC8iFfMn+YBcehCPOv/0gLi XTy27e4saq9L6yNbDmcu0VJ91JHm6ityOFu+evm11rueTpP1dL817lS7tpXx ruRSbYl6mvzvpPgQ0Sdw4H4BP3viySOjPpJ5vh1nBFdYU+SjHf3nos3QRDSh z+4jP0THfyWQf0mR9XR57fX0hp/aoF+Ou9xjqUev6ur6L4FCW1xrjPz8MRw5 1bSG/osO5aUGBLz+PGEzX/RSRP/FXkeqD5F5TLTgTOvQJDQjH+1A350iiCeP J8F/yliUl+nV/ovWbixZIx4+2QTPftab5jWkzpq5lrhYTGupTYk7rZf6Yc7e zrhQRVsiv6Cc+azJIPt1/WW/zkD+xtqv8+ZeZiwakXZE7CZtNQmgfCaQeUS/ D1qIsBnP4ZzJARUl8p72mjlv0mP23ofQinvhC0LEHu+N6NdVNb1dr+qx1U/W 0N8lP3hWI+q9VkHvid5tpf6ur+ztWvu77nMJw2TR352d5iF8ONcklfq7xJE1 3N9d5anuSw654h5UQ+JSWVtGkSs9tekJHDrRzNaXIB8p8mCqJ49SXTJjfgD5 Dfv9gGS5J0DHOsqLe4ycihkpfjjKuUGFYrfXJnP3g782F2PI/Yf69ywbGhd7 bVl64S2WBODtPX9DKe8FlV26f8R7sLxXlJ33KFKznJH6iTNWrO+F/ft5/0hn 2z86rRP9DT4uo9/f5v2jJf4iNupu8v2jqmbfB+620gvZB9pX3m88XWW/sVy1 6vYbf7PsN7ZX9xstmrl19huraktv2Wujmsu44QnkH28u1y16frJer3Z/2pKr 0rn76Zogulb0StKMDf7ux/V/nyFUvJswdXdXmIqktkQf2C7vKSedWN5nKC40 0Lnd0GyJ2l/+g7zPUNVse/mheHA5v//SQa3nqrz/Qpbxw/3ostz7hrxbdmPf lwoWa/Zb74SvjraUvofflzp2JwbnOst69zpo5mbBxWLaTNv+SyPxfl13vPZF V/GuHcf5P9v7dZUss4b3MZdcfW52S+NimUfG7fd3bwW7jcttXK4Ul/8DoDUL 6Q== "], {{0, 23.501207700951294`}, {35.00179870354448, 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->{143.9926, 143.9926}], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{35.00179870354448, 23.501207700951294`}, PlotRange->{{0, 35.00179870354448}, {0, 23.501207700951294`}}]\), \!\(\* GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt2ElME1EYB3CiHmSpkJDo2YMJnryQ6EnlYmK8YYjRG0QWBUqCC7gABwUV 8EBiEA8CoWxVUDCihhYoxbYIglg2MXZhCrRlCasGKJ2/X6cNAcGL0RlS35f8 2umb18nrm7d804NxadEJuwICAq7spZfo2Iyo9PTYG2fD6EOM/MqlRHn8xdPy q/GJ8enH4nZT4RFyiuwh1+osYBiGYRiGYRiGYZjfuV7/ixdbZbyw/hXbXfvP WP+55GrTJik1ZomYBMl0vBNUGJybKERWYXB4jzsnfTaWSWfnhIu4pW7Eerh5 MfHr6CNcLhfm7BwcX/QYH2iHrU8F59duzI5b4Fp1CXXcbl7kNnpJFSuL87D3 t4HrrAenV8DSWgTb+1KMakrAdTViYqAVy4tz0jVQzOC9N2JlaR4T/e3gDEqY Vfn42ngbA8o0GKsvY+RVNszqAnA6hVBneXF203f9MjxzaM2FqW+94GhsmJof wFiVAM3dE1BlHIIqMwLtucdhrEygvikU6kybjeDXVv27X2jFWPk+j7GeJlg6 SjHwTI7WrKPozQ3CXN1ezNcFoud+CNRZkRh+ngprWwnGPjbR+PLj+eS7399n HLDpa2FS3UdX8QXossMxpQwGV7oP3FMZpmoDocvZj85HMbC8y6O6VViaHvd+ 3x/HjO83LTo52Loa8K05H9rCM/hcuI/GSihGikIxVCTD3HMZjA/D0EHnPGuP tbMBC07bpmv4V/CCpRk77UFVtLbk4UPxOWhvHwBUIXBWhsGukAHqYLRlhqP7 8Xmqc4/2qmoaL3bfJfyxXyD8rtUfC7S+vIVV8wSDyhS0ZEeiO1cGhyIIk5XB 6LoTTGVHMaSUw6J9ClvPGyx71hd/7RNP+PajaVMfbLpSmicF6K9KgibvJNQ3 D0N9KwLavCgMVicJe9Uo1fHsXW7aj3he3FyYF8nG8OwvntzEqquAuaUAI69z YKy5hMFnaZS/3KQ9+gHNtVqMU963TLmOt6Hijhex+mW7vrEPaii3fSnMKU5X JuS8nKFCyIEn+jWS5rtrdB/EsvE5af35aGIUU6ZPGOtrpb7QwjFsoDKbcE54 PuL/r+ejrbFGVqVuxHqU6yclU6Z3okznEN7LPQwbynRO77FEUmtMzDYy6i3M NqT+351hGIZhGIZhGGYHcTFb/QT3kT3X "], {{0, 23.501207700951294`}, {35.00179870354448, 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->{143.9926, 143.9926}], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{35.00179870354448, 23.501207700951294`}, PlotRange->{{0, 35.00179870354448}, {0, 23.501207700951294`}}]\), \!\(\* GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt1D0KwjAYgOFgHRy9gquLg4qu/iAITvVnb7EWlwqtIN7GRU/gBXRw8hiu 1lls/Yzi2LEilPeDNyEZH0JK9sKc5ZRSQUEvprVq+b61Hhb1YewFc9dzpn1v 6biO37QNfVnR9XR5nRptJe2MyU7UYCP780Xe84hjSW3i6LPdT0e5NsoSdusS tqqpdmvXUjfB5d8uB1wSXb7vpYNL5lwiXHDBBZffuET8u7jgggsuuOCCCy64 4IILLrjgggsuuOCCCy644IILLrjgggsuuOCCCy644IILLrjgkuDyxCUjLi9R FMBP "], {{0, 23.501207700951294`}, {35.00179870354448, 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->{143.9926, 143.9926}], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{35.00179870354448, 23.501207700951294`}, PlotRange->{{0, 35.00179870354448}, {0, 23.501207700951294`}}]\), \!\(\* GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt0DsKwlAURdHnpxAsFISgNiY6ACt/pY1gqziABGOwiZAI4lgsnIljCNba GOdgIxzfIFJY7GJfuKdcXnBY7crGmLRmz8o/zZPEP6+b9tnE6T6Kw+0yPoZR mEyDih2HtoWtavN6ropu4LlynL5u17r0MPpmRroXVFaSnkafS0uvxkx5d6S8 PS60d2dSuAkuuOCCCy644IILLrjgggsuuOCCCy644IILLrjgggsuuOCCCy64 4IILLrjgggsuuOCCCy644IILLrjgggsu/+3yAxlWXgg= "], {{0, 23.501207700951294`}, {35.00179870354448, 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->{143.9926, 143.9926}], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{35.00179870354448, 23.501207700951294`}, PlotRange->{{0, 35.00179870354448}, {0, 23.501207700951294`}}]\)}, "BottomTicks" -> {"Jun 2022", "Aug 2022", "Dec 2022"}]
Out[6]=

Color with specified colors:

In[7]:=
ranking = {{2, 4, 3, 1}, {1, 3, 4, 2}, {1, 2, 3, 4}}; ResourceFunction["RankChart"][ranking, Sequence["Names" -> { Image[NumericArray[CompressedData[" 1:eJztWnlcVWUaPndDXNJMHdOyJpdqUkfTMpVNCEGQTS4ojdOUqFmmFppTNjra r2XSRBZBFqHFhUUzcEMTcSnX1DILK7VfmmYqClyCXLj4zPt+37kLCIgoLuUf L/fcyznn+77nPM+7feeB8JeCn9MqijLJkf4Ej3jVfeLEEVOMd9KX0AmTXhgz YfQonwmvjB4zemLfcB392IPMi0xPpmQE4bZVNk3mkBs+h5vRbuNyc+OiIdNl BgrT3AzzuQlwYSzE8aJQafa//Qlx0Waq618UAof0IfjPrq7CGtEx46Ol/2lv ED43AhfWiZ7Xm0ZjLwyBb64zvjrWEihThH31S0v45rnQ/4g7acHi3OutreuN i1UftOaHsr2Q8f29QCnh8ZuCC0VaYXyMUg3Sf7gPXbIH0blDK1/7B8LFqgnS TFP6Pm1XN5iKHAQ/Kor1ZFpcLNYIMxeRFevE//icabseQRNx7dDrpq2GxsWm GSOUxSEYsqEv8o/fCfxOnChmjugIBx3KC3W4cEYaH5uZO/QJk0bgk3+8BYI3 ONE9jKq2AqC9RXERvGcfumAouq7wRNbBe6yaOa/iwNgIjC6QmVW7oFhxO0/n 8LkoUcS1WQfvRdeVnsIvKekNp62GwIV5ruH50tybL/HDW3seRhmvjdZVTjzg tQp8CINykwH5+zsgO68nUrKckJLtjOV0nJ/fgbRlkDiVSnz4WuZOWZEeb375 MFos9Rd+qiG0dS1xseRmyuJgwfewTX1x8MQdMs6wZoQ+NGKtx460wvSUQHQf 9V/oBsVCcUuE4pIExTlZHGvpt27h0/DG/AA69y5xTYVVW5JPB040Q9jmPlJb NKaOtHWt4ta1wEXiESA1Q8/v0VUeyPmxreREieSIuZD8KmvhnILodC+0CZwt MfCIhzIoGjrfOdAPngMdGx3zb4pHHBSn+WgdNBvRGQPFtXwPvpfgjqqtnEPt 0Hv1kzT2MDGHa6Gtq8XFymHCo9XHfojc2wXn1Fgi8KD4ws+5gtZwrsQRYdNH Q+mXAsUrhnCIhNYnChrGoIrxb/w/PofPVfqnIOyNMThnaiTuVaHeW+DDOqMx I/c+hNY0B84JNRlXp6364mLliIgPRjy7uTcOn2gi8Liozpc/KzjuUgw2lzog YMqLUPrOh8FvNjS05qpY1GR8rsEvUuAZNGU8zGUGlNM9K9S4bhmLxz5ysilG fN7LGv/qW2/VBxdrnCGO9M1xQ95Pd1s1w3mZZb5izmfoeV5U8FoC5a5OqXAk /eh8Y0gv0vSDY8V3rU9MtbyxN8ZT6ZeKyXEh0mefseU8POYFi7YIn42H/4L+ awbInDldxvWGwsWKPY3Vdpkv4vZ1gdmktcYZs11uJjAhP4DzCtZ+1hFKH9KC 23tQXMl3uNKzd2H/Mouwepe+06cHffeOglbFTOPDPKmMFR/rfeh6j3nYvruL 8Dec69iPabbLmc0leppjZ9z9sa+IjaytuvqeuuBivR/lqlriyfPbeuGXgsZq rmrjcVXjOZrpnLhlszAiJg+T09bg9SV5mLF0E6anb0ZEah7GRK+Hz5Rl6B6+ GI0Hk591I8ycCStP+hyo+l8fGzbslxXXRPj8e5zARfjzasYuF7yVcf3YKUe8 sOVRaLgeW2TRVu341IaLLVcNFhxxW+uGLUfayLhrkrytbk7S6DkW0nnnewI4 i+zCDfi0eAtWFm3COtNWLC/aiI2/70D0scUoQiF2FRzA5gM/4q1PNiP8f+tw X2gqHnz2fRiIO4pXFOERa8cb8scUx7+jvIfjtbmWeQjumKS2eO5un7rWqR6t DhdrHpIhc7MOn/giJf8B4qZG1YyuUj1TPVf0uEjn7vnmabyTtg8RyZ9i+Lur Meyt5TC+vRz/jFyNcUk5eCVjFRZs3Y2Pf9iJL4q/xariz5B5MhcbDucja/v3 CJ66ChoP8tGuM6XGfGQcU5zni3jPfobz5trmYuG0xQemfvtXWpOPxCej+py5 er4EilhnIH/10vaeKDjjKJ9LsbZGzVzynDinpTkPmfo0+ZBE9Bj9IfnMd8T6 FJdZ0rewjxlAHHgyCm2NSXAan44JCbmYuX4dUg+tRVbBJuSd2oPFW7+B/6vZ dO1soS9Hf+IM5YDD3xwJlLP/rR2XytqScevUmUZ4eXsPWqPU1uVwYa4YyAYS 33b+3EpqpkS9p+nyY9v7FsZyQMQr0LknEvfnCC2IWCR8a6zws8J3sLEvGUB+ 2XkmDJ4x6PNCGsZ9sAKxX65F6q8rkFuwCwlr9qBz2PuEz7vEoUS4RUy+rI5q wseirR2USw9c5woHzndqwEXm8EYYKX8XdRvZWbW2vZJxBXeLpOYeH/sqFPd5 xP1oa2zRqDh0GJ6CZkFxwn+I2EPGWhFxic5x9I3D3cHJGDV3JWL2rhIayzn0 NUKmE3f6xKLPuNfEGDzWlc6P13SWOa2uc9jGPtCIWiKwRr44kHnnumDnUZUv JqXO+rHhIvni+nIE8SBB5vaEhWaQjMGMRfunktAkME7yhszBLxaNA+ZWzmO8 6DqnWXiQeDIxfSVSfs5B7ultCI/ahCfGjieXLnPf+vKFNeG1zqVWvlgtM0ho zkA+O2IH+ZfTtphcV+5wXsHaH/5muPAvBoqvrUPmoX0Y1USD1FyXteOtcoWO 2/0jGR2fSSV/E2nN8xhDzmfYr2jcohAwbSlSv1uH1ae/wb7vEwgTzq/1deaI 8C/0vArIv0Ts6EF4sH8x1jlO2/qNQ3Ffli9S8ztKjH9TrP7rsn63QkFkmicM A1LQ0hgDl0kZ0BIOTQPjRZ6rsWoqCq1DE9BuWBK0XtHoPXah/L1SLUA4+dJx 35noOHwedh4spPg/BeYzjIuhbvGI+6MUU1Py1Xi0aKiIMXWPR1XyF7U/77bW FVt+bmPVVm35i/C7xPGv97UjDnyAdqQZxf09wZFOz7yPuwgHrZddzUjHLY3M q7kw+MZeiouoA2LR68VFcCS+dR+1ECePdRL1dUVRzfGoUv5yuBXlL260lmGi 536l+Uv1+Yy/rMModo/d1hPHVW1Z9FotNqIO0MB7MtWLLonQ+5Fu6Lnf81Sy 9CkelId423BpERyPrqM/krmu6nP4d8v/Fc8oDJjEeXEqBr8+HhdKa45F9rXk 8QJHPL+1F7Rpsi9Ul1qyfvVRCNotG4x5+zpVqY+q8TGUq++gWobjKtc2/Nzv oBjEn39/biHxI1b6G1p3s6B4dKIcl/1Lc8KocUC8iFfMn+YBcehCPOv/0gLi XTy27e4saq9L6yNbDmcu0VJ91JHm6ityOFu+evm11rueTpP1dL817lS7tpXx ruRSbYl6mvzvpPgQ0Sdw4H4BP3viySOjPpJ5vh1nBFdYU+SjHf3nos3QRDSh z+4jP0THfyWQf0mR9XR57fX0hp/aoF+Ou9xjqUev6ur6L4FCW1xrjPz8MRw5 1bSG/osO5aUGBLz+PGEzX/RSRP/FXkeqD5F5TLTgTOvQJDQjH+1A350iiCeP J8F/yliUl+nV/ovWbixZIx4+2QTPftab5jWkzpq5lrhYTGupTYk7rZf6Yc7e zrhQRVsiv6Cc+azJIPt1/WW/zkD+xtqv8+ZeZiwakXZE7CZtNQmgfCaQeUS/ D1qIsBnP4ZzJARUl8p72mjlv0mP23ofQinvhC0LEHu+N6NdVNb1dr+qx1U/W 0N8lP3hWI+q9VkHvid5tpf6ur+ztWvu77nMJw2TR352d5iF8ONcklfq7xJE1 3N9d5anuSw654h5UQ+JSWVtGkSs9tekJHDrRzNaXIB8p8mCqJ49SXTJjfgD5 Dfv9gGS5J0DHOsqLe4ycihkpfjjKuUGFYrfXJnP3g782F2PI/Yf69ywbGhd7 bVl64S2WBODtPX9DKe8FlV26f8R7sLxXlJ33KFKznJH6iTNWrO+F/ft5/0hn 2z86rRP9DT4uo9/f5v2jJf4iNupu8v2jqmbfB+620gvZB9pX3m88XWW/sVy1 6vYbf7PsN7ZX9xstmrl19huraktv2Wujmsu44QnkH28u1y16frJer3Z/2pKr 0rn76Zogulb0StKMDf7ux/V/nyFUvJswdXdXmIqktkQf2C7vKSedWN5nKC40 0Lnd0GyJ2l/+g7zPUNVse/mheHA5v//SQa3nqrz/Qpbxw/3ostz7hrxbdmPf lwoWa/Zb74SvjraUvofflzp2JwbnOst69zpo5mbBxWLaTNv+SyPxfl13vPZF V/GuHcf5P9v7dZUss4b3MZdcfW52S+NimUfG7fd3bwW7jcttXK4Ul/8DoDUL 6Q== "],"UnsignedInteger8"], "Byte", ColorSpace -> "RGB", ImageResolution -> {143.9926, 143.9926}, Interleaving -> True], Image[NumericArray[CompressedData[" 1:eJzt2ElME1EYB3CiHmSpkJDo2YMJnryQ6EnlYmK8YYjRG0QWBUqCC7gABwUV 8EBiEA8CoWxVUDCihhYoxbYIglg2MXZhCrRlCasGKJ2/X6cNAcGL0RlS35f8 2umb18nrm7d804NxadEJuwICAq7spZfo2Iyo9PTYG2fD6EOM/MqlRHn8xdPy q/GJ8enH4nZT4RFyiuwh1+osYBiGYRiGYRiGYZjfuV7/ixdbZbyw/hXbXfvP WP+55GrTJik1ZomYBMl0vBNUGJybKERWYXB4jzsnfTaWSWfnhIu4pW7Eerh5 MfHr6CNcLhfm7BwcX/QYH2iHrU8F59duzI5b4Fp1CXXcbl7kNnpJFSuL87D3 t4HrrAenV8DSWgTb+1KMakrAdTViYqAVy4tz0jVQzOC9N2JlaR4T/e3gDEqY Vfn42ngbA8o0GKsvY+RVNszqAnA6hVBneXF203f9MjxzaM2FqW+94GhsmJof wFiVAM3dE1BlHIIqMwLtucdhrEygvikU6kybjeDXVv27X2jFWPk+j7GeJlg6 SjHwTI7WrKPozQ3CXN1ezNcFoud+CNRZkRh+ngprWwnGPjbR+PLj+eS7399n HLDpa2FS3UdX8QXossMxpQwGV7oP3FMZpmoDocvZj85HMbC8y6O6VViaHvd+ 3x/HjO83LTo52Loa8K05H9rCM/hcuI/GSihGikIxVCTD3HMZjA/D0EHnPGuP tbMBC07bpmv4V/CCpRk77UFVtLbk4UPxOWhvHwBUIXBWhsGukAHqYLRlhqP7 8Xmqc4/2qmoaL3bfJfyxXyD8rtUfC7S+vIVV8wSDyhS0ZEeiO1cGhyIIk5XB 6LoTTGVHMaSUw6J9ClvPGyx71hd/7RNP+PajaVMfbLpSmicF6K9KgibvJNQ3 D0N9KwLavCgMVicJe9Uo1fHsXW7aj3he3FyYF8nG8OwvntzEqquAuaUAI69z YKy5hMFnaZS/3KQ9+gHNtVqMU963TLmOt6Hijhex+mW7vrEPaii3fSnMKU5X JuS8nKFCyIEn+jWS5rtrdB/EsvE5af35aGIUU6ZPGOtrpb7QwjFsoDKbcE54 PuL/r+ejrbFGVqVuxHqU6yclU6Z3okznEN7LPQwbynRO77FEUmtMzDYy6i3M NqT+351hGIZhGIZhGGYHcTFb/QT3kT3X "],"UnsignedInteger8"], "Byte", ColorSpace -> "RGB", ImageResolution -> {143.9926, 143.9926}, Interleaving -> True], Image[NumericArray[CompressedData[" 1:eJzt1D0KwjAYgOFgHRy9gquLg4qu/iAITvVnb7EWlwqtIN7GRU/gBXRw8hiu 1lls/Yzi2LEilPeDNyEZH0JK9sKc5ZRSQUEvprVq+b61Hhb1YewFc9dzpn1v 6biO37QNfVnR9XR5nRptJe2MyU7UYCP780Xe84hjSW3i6LPdT0e5NsoSdusS tqqpdmvXUjfB5d8uB1wSXb7vpYNL5lwiXHDBBZffuET8u7jgggsuuOCCCy64 4IILLrjgggsuuOCCCy644IILLrjgggsuuOCCCy644IILLrjgkuDyxCUjLi9R FMBP "],"UnsignedInteger8"], "Byte", ColorSpace -> "RGB", ImageResolution -> {143.9926, 143.9926}, Interleaving -> True], Image[NumericArray[CompressedData[" 1:eJzt0DsKwlAURdHnpxAsFISgNiY6ACt/pY1gqziABGOwiZAI4lgsnIljCNba GOdgIxzfIFJY7GJfuKdcXnBY7crGmLRmz8o/zZPEP6+b9tnE6T6Kw+0yPoZR mEyDih2HtoWtavN6ropu4LlynL5u17r0MPpmRroXVFaSnkafS0uvxkx5d6S8 PS60d2dSuAkuuOCCCy644IILLrjgggsuuOCCCy644IILLrjgggsuuOCCCy64 4IILLrjgggsuuOCCCy644IILLrjgggsu/+3yAxlWXgg= "],"UnsignedInteger8"], "Byte", ColorSpace -> "RGB", ImageResolution -> {143.9926, 143.9926}, Interleaving -> True]}, "BottomTicks" -> {"Jun 2022", "Aug 2022", "Dec 2022"}], "Colors" -> {RGBColor[ Rational[254, 255], Rational[223, 255], 0], RGBColor[ Rational[116, 255], Rational[172, 255], Rational[223, 255]], RGBColor[0, Rational[7, 51], Rational[149, 255]], RGBColor[ Rational[79, 85], Rational[41, 255], Rational[19, 85]]}]
Out[8]=

Specify the point size and the thickness:

In[9]:=
ranking = {{2, 4, 3, 1}, {1, 3, 4, 2}, {1, 2, 3, 4}}; ResourceFunction["RankChart"][ranking, Sequence["Names" -> { Image[NumericArray[CompressedData[" 1:eJztWnlcVWUaPndDXNJMHdOyJpdqUkfTMpVNCEGQTS4ojdOUqFmmFppTNjra r2XSRBZBFqHFhUUzcEMTcSnX1DILK7VfmmYqClyCXLj4zPt+37kLCIgoLuUf L/fcyznn+77nPM+7feeB8JeCn9MqijLJkf4Ej3jVfeLEEVOMd9KX0AmTXhgz YfQonwmvjB4zemLfcB392IPMi0xPpmQE4bZVNk3mkBs+h5vRbuNyc+OiIdNl BgrT3AzzuQlwYSzE8aJQafa//Qlx0Waq618UAof0IfjPrq7CGtEx46Ol/2lv ED43AhfWiZ7Xm0ZjLwyBb64zvjrWEihThH31S0v45rnQ/4g7acHi3OutreuN i1UftOaHsr2Q8f29QCnh8ZuCC0VaYXyMUg3Sf7gPXbIH0blDK1/7B8LFqgnS TFP6Pm1XN5iKHAQ/Kor1ZFpcLNYIMxeRFevE//icabseQRNx7dDrpq2GxsWm GSOUxSEYsqEv8o/fCfxOnChmjugIBx3KC3W4cEYaH5uZO/QJk0bgk3+8BYI3 ONE9jKq2AqC9RXERvGcfumAouq7wRNbBe6yaOa/iwNgIjC6QmVW7oFhxO0/n 8LkoUcS1WQfvRdeVnsIvKekNp62GwIV5ruH50tybL/HDW3seRhmvjdZVTjzg tQp8CINykwH5+zsgO68nUrKckJLtjOV0nJ/fgbRlkDiVSnz4WuZOWZEeb375 MFos9Rd+qiG0dS1xseRmyuJgwfewTX1x8MQdMs6wZoQ+NGKtx460wvSUQHQf 9V/oBsVCcUuE4pIExTlZHGvpt27h0/DG/AA69y5xTYVVW5JPB040Q9jmPlJb NKaOtHWt4ta1wEXiESA1Q8/v0VUeyPmxreREieSIuZD8KmvhnILodC+0CZwt MfCIhzIoGjrfOdAPngMdGx3zb4pHHBSn+WgdNBvRGQPFtXwPvpfgjqqtnEPt 0Hv1kzT2MDGHa6Gtq8XFymHCo9XHfojc2wXn1Fgi8KD4ws+5gtZwrsQRYdNH Q+mXAsUrhnCIhNYnChrGoIrxb/w/PofPVfqnIOyNMThnaiTuVaHeW+DDOqMx I/c+hNY0B84JNRlXp6364mLliIgPRjy7uTcOn2gi8Liozpc/KzjuUgw2lzog YMqLUPrOh8FvNjS05qpY1GR8rsEvUuAZNGU8zGUGlNM9K9S4bhmLxz5ysilG fN7LGv/qW2/VBxdrnCGO9M1xQ95Pd1s1w3mZZb5izmfoeV5U8FoC5a5OqXAk /eh8Y0gv0vSDY8V3rU9MtbyxN8ZT6ZeKyXEh0mefseU8POYFi7YIn42H/4L+ awbInDldxvWGwsWKPY3Vdpkv4vZ1gdmktcYZs11uJjAhP4DzCtZ+1hFKH9KC 23tQXMl3uNKzd2H/Mouwepe+06cHffeOglbFTOPDPKmMFR/rfeh6j3nYvruL 8Dec69iPabbLmc0leppjZ9z9sa+IjaytuvqeuuBivR/lqlriyfPbeuGXgsZq rmrjcVXjOZrpnLhlszAiJg+T09bg9SV5mLF0E6anb0ZEah7GRK+Hz5Rl6B6+ GI0Hk591I8ycCStP+hyo+l8fGzbslxXXRPj8e5zARfjzasYuF7yVcf3YKUe8 sOVRaLgeW2TRVu341IaLLVcNFhxxW+uGLUfayLhrkrytbk7S6DkW0nnnewI4 i+zCDfi0eAtWFm3COtNWLC/aiI2/70D0scUoQiF2FRzA5gM/4q1PNiP8f+tw X2gqHnz2fRiIO4pXFOERa8cb8scUx7+jvIfjtbmWeQjumKS2eO5un7rWqR6t DhdrHpIhc7MOn/giJf8B4qZG1YyuUj1TPVf0uEjn7vnmabyTtg8RyZ9i+Lur Meyt5TC+vRz/jFyNcUk5eCVjFRZs3Y2Pf9iJL4q/xariz5B5MhcbDucja/v3 CJ66ChoP8tGuM6XGfGQcU5zni3jPfobz5trmYuG0xQemfvtXWpOPxCej+py5 er4EilhnIH/10vaeKDjjKJ9LsbZGzVzynDinpTkPmfo0+ZBE9Bj9IfnMd8T6 FJdZ0rewjxlAHHgyCm2NSXAan44JCbmYuX4dUg+tRVbBJuSd2oPFW7+B/6vZ dO1soS9Hf+IM5YDD3xwJlLP/rR2XytqScevUmUZ4eXsPWqPU1uVwYa4YyAYS 33b+3EpqpkS9p+nyY9v7FsZyQMQr0LknEvfnCC2IWCR8a6zws8J3sLEvGUB+ 2XkmDJ4x6PNCGsZ9sAKxX65F6q8rkFuwCwlr9qBz2PuEz7vEoUS4RUy+rI5q wseirR2USw9c5woHzndqwEXm8EYYKX8XdRvZWbW2vZJxBXeLpOYeH/sqFPd5 xP1oa2zRqDh0GJ6CZkFxwn+I2EPGWhFxic5x9I3D3cHJGDV3JWL2rhIayzn0 NUKmE3f6xKLPuNfEGDzWlc6P13SWOa2uc9jGPtCIWiKwRr44kHnnumDnUZUv JqXO+rHhIvni+nIE8SBB5vaEhWaQjMGMRfunktAkME7yhszBLxaNA+ZWzmO8 6DqnWXiQeDIxfSVSfs5B7ultCI/ahCfGjieXLnPf+vKFNeG1zqVWvlgtM0ho zkA+O2IH+ZfTtphcV+5wXsHaH/5muPAvBoqvrUPmoX0Y1USD1FyXteOtcoWO 2/0jGR2fSSV/E2nN8xhDzmfYr2jcohAwbSlSv1uH1ae/wb7vEwgTzq/1deaI 8C/0vArIv0Ts6EF4sH8x1jlO2/qNQ3Ffli9S8ztKjH9TrP7rsn63QkFkmicM A1LQ0hgDl0kZ0BIOTQPjRZ6rsWoqCq1DE9BuWBK0XtHoPXah/L1SLUA4+dJx 35noOHwedh4spPg/BeYzjIuhbvGI+6MUU1Py1Xi0aKiIMXWPR1XyF7U/77bW FVt+bmPVVm35i/C7xPGv97UjDnyAdqQZxf09wZFOz7yPuwgHrZddzUjHLY3M q7kw+MZeiouoA2LR68VFcCS+dR+1ECePdRL1dUVRzfGoUv5yuBXlL260lmGi 536l+Uv1+Yy/rMModo/d1hPHVW1Z9FotNqIO0MB7MtWLLonQ+5Fu6Lnf81Sy 9CkelId423BpERyPrqM/krmu6nP4d8v/Fc8oDJjEeXEqBr8+HhdKa45F9rXk 8QJHPL+1F7Rpsi9Ul1qyfvVRCNotG4x5+zpVqY+q8TGUq++gWobjKtc2/Nzv oBjEn39/biHxI1b6G1p3s6B4dKIcl/1Lc8KocUC8iFfMn+YBcehCPOv/0gLi XTy27e4saq9L6yNbDmcu0VJ91JHm6ityOFu+evm11rueTpP1dL817lS7tpXx ruRSbYl6mvzvpPgQ0Sdw4H4BP3viySOjPpJ5vh1nBFdYU+SjHf3nos3QRDSh z+4jP0THfyWQf0mR9XR57fX0hp/aoF+Ou9xjqUev6ur6L4FCW1xrjPz8MRw5 1bSG/osO5aUGBLz+PGEzX/RSRP/FXkeqD5F5TLTgTOvQJDQjH+1A350iiCeP J8F/yliUl+nV/ovWbixZIx4+2QTPftab5jWkzpq5lrhYTGupTYk7rZf6Yc7e zrhQRVsiv6Cc+azJIPt1/WW/zkD+xtqv8+ZeZiwakXZE7CZtNQmgfCaQeUS/ D1qIsBnP4ZzJARUl8p72mjlv0mP23ofQinvhC0LEHu+N6NdVNb1dr+qx1U/W 0N8lP3hWI+q9VkHvid5tpf6ur+ztWvu77nMJw2TR352d5iF8ONcklfq7xJE1 3N9d5anuSw654h5UQ+JSWVtGkSs9tekJHDrRzNaXIB8p8mCqJ49SXTJjfgD5 Dfv9gGS5J0DHOsqLe4ycihkpfjjKuUGFYrfXJnP3g782F2PI/Yf69ywbGhd7 bVl64S2WBODtPX9DKe8FlV26f8R7sLxXlJ33KFKznJH6iTNWrO+F/ft5/0hn 2z86rRP9DT4uo9/f5v2jJf4iNupu8v2jqmbfB+620gvZB9pX3m88XWW/sVy1 6vYbf7PsN7ZX9xstmrl19huraktv2Wujmsu44QnkH28u1y16frJer3Z/2pKr 0rn76Zogulb0StKMDf7ux/V/nyFUvJswdXdXmIqktkQf2C7vKSedWN5nKC40 0Lnd0GyJ2l/+g7zPUNVse/mheHA5v//SQa3nqrz/Qpbxw/3ostz7hrxbdmPf lwoWa/Zb74SvjraUvofflzp2JwbnOst69zpo5mbBxWLaTNv+SyPxfl13vPZF V/GuHcf5P9v7dZUss4b3MZdcfW52S+NimUfG7fd3bwW7jcttXK4Ul/8DoDUL 6Q== "],"UnsignedInteger8"], "Byte", ColorSpace -> "RGB", ImageResolution -> {143.9926, 143.9926}, Interleaving -> True], Image[NumericArray[CompressedData[" 1:eJzt2ElME1EYB3CiHmSpkJDo2YMJnryQ6EnlYmK8YYjRG0QWBUqCC7gABwUV 8EBiEA8CoWxVUDCihhYoxbYIglg2MXZhCrRlCasGKJ2/X6cNAcGL0RlS35f8 2umb18nrm7d804NxadEJuwICAq7spZfo2Iyo9PTYG2fD6EOM/MqlRHn8xdPy q/GJ8enH4nZT4RFyiuwh1+osYBiGYRiGYRiGYZjfuV7/ixdbZbyw/hXbXfvP WP+55GrTJik1ZomYBMl0vBNUGJybKERWYXB4jzsnfTaWSWfnhIu4pW7Eerh5 MfHr6CNcLhfm7BwcX/QYH2iHrU8F59duzI5b4Fp1CXXcbl7kNnpJFSuL87D3 t4HrrAenV8DSWgTb+1KMakrAdTViYqAVy4tz0jVQzOC9N2JlaR4T/e3gDEqY Vfn42ngbA8o0GKsvY+RVNszqAnA6hVBneXF203f9MjxzaM2FqW+94GhsmJof wFiVAM3dE1BlHIIqMwLtucdhrEygvikU6kybjeDXVv27X2jFWPk+j7GeJlg6 SjHwTI7WrKPozQ3CXN1ezNcFoud+CNRZkRh+ngprWwnGPjbR+PLj+eS7399n HLDpa2FS3UdX8QXossMxpQwGV7oP3FMZpmoDocvZj85HMbC8y6O6VViaHvd+ 3x/HjO83LTo52Loa8K05H9rCM/hcuI/GSihGikIxVCTD3HMZjA/D0EHnPGuP tbMBC07bpmv4V/CCpRk77UFVtLbk4UPxOWhvHwBUIXBWhsGukAHqYLRlhqP7 8Xmqc4/2qmoaL3bfJfyxXyD8rtUfC7S+vIVV8wSDyhS0ZEeiO1cGhyIIk5XB 6LoTTGVHMaSUw6J9ClvPGyx71hd/7RNP+PajaVMfbLpSmicF6K9KgibvJNQ3 D0N9KwLavCgMVicJe9Uo1fHsXW7aj3he3FyYF8nG8OwvntzEqquAuaUAI69z YKy5hMFnaZS/3KQ9+gHNtVqMU963TLmOt6Hijhex+mW7vrEPaii3fSnMKU5X JuS8nKFCyIEn+jWS5rtrdB/EsvE5af35aGIUU6ZPGOtrpb7QwjFsoDKbcE54 PuL/r+ejrbFGVqVuxHqU6yclU6Z3okznEN7LPQwbynRO77FEUmtMzDYy6i3M NqT+351hGIZhGIZhGGYHcTFb/QT3kT3X "],"UnsignedInteger8"], "Byte", ColorSpace -> "RGB", ImageResolution -> {143.9926, 143.9926}, Interleaving -> True], Image[NumericArray[CompressedData[" 1:eJzt1D0KwjAYgOFgHRy9gquLg4qu/iAITvVnb7EWlwqtIN7GRU/gBXRw8hiu 1lls/Yzi2LEilPeDNyEZH0JK9sKc5ZRSQUEvprVq+b61Hhb1YewFc9dzpn1v 6biO37QNfVnR9XR5nRptJe2MyU7UYCP780Xe84hjSW3i6LPdT0e5NsoSdusS tqqpdmvXUjfB5d8uB1wSXb7vpYNL5lwiXHDBBZffuET8u7jgggsuuOCCCy64 4IILLrjgggsuuOCCCy644IILLrjgggsuuOCCCy644IILLrjgkuDyxCUjLi9R FMBP "],"UnsignedInteger8"], "Byte", ColorSpace -> "RGB", ImageResolution -> {143.9926, 143.9926}, Interleaving -> True], Image[NumericArray[CompressedData[" 1:eJzt0DsKwlAURdHnpxAsFISgNiY6ACt/pY1gqziABGOwiZAI4lgsnIljCNba GOdgIxzfIFJY7GJfuKdcXnBY7crGmLRmz8o/zZPEP6+b9tnE6T6Kw+0yPoZR mEyDih2HtoWtavN6ropu4LlynL5u17r0MPpmRroXVFaSnkafS0uvxkx5d6S8 PS60d2dSuAkuuOCCCy644IILLrjgggsuuOCCCy644IILLrjgggsuuOCCCy64 4IILLrjgggsuuOCCCy644IILLrjgggsu/+3yAxlWXgg= "],"UnsignedInteger8"], "Byte", ColorSpace -> "RGB", ImageResolution -> {143.9926, 143.9926}, Interleaving -> True]}, "BottomTicks" -> {"Jun 2022", "Aug 2022", "Dec 2022"}, "Colors" -> { RGBColor[254/255, 223/255, 0], RGBColor[116/255, 172/255, 223/255], RGBColor[0, 7/51, 149/255], RGBColor[79/85, 41/255, 19/85]}], "PointSize" -> .1, "Thickness" -> .04]
Out[10]=

Applications (1) 

The 2021 FIA F1 Driver Standings. Specify options, FrameLabel and ImageSize that can be specified in ListPlot:

In[11]:=
ranking = { Sequence[{2, 1, 3, 5, 8, 4, 6, 7, 21, 20, 19, 18, 10, 9, 17, 16, 15, 14, 13, 12, 11}, {2, 1, 5, 8, 7, 3, 4, 6, 9, 13, 12, 21, 10, 11, 20, 19, 18, 17, 16, 15, 14}, {2, 1, 4, 6, 8, 3, 5, 7, 10, 12, 9, 21, 11, 13, 20, 19, 18, 17, 16, 15, 14}, {2, 1, 3, 6, 8, 4, 5, 7, 10, 12, 9, 21, 11, 13, 20, 19, 18, 17, 16, 15, 14}, {1, 2, 4, 5, 7, 3, 6, 8, 9, 13, 10, 11, 12, 14, 21, 20, 19, 15, 18, 17, 16}, {1, 2, 6, 3, 7, 4, 5, 10, 8, 11, 12, 9, 13, 14, 21, 16, 20, 15, 19, 18, 17}, {1, 2, 5, 3, 7, 4, 6, 9, 8, 11, 12, 10, 13, 14, 21, 16, 20, 15, 19, 18, 17}, {1, 2, 5, 3, 7, 4, 6, 9, 8, 11, 13, 10, 12, 14, 21, 16, 20, 15, 19, 18, 17}, {1, 2, 5, 3, 7, 4, 6, 8, 9, 11, 13, 10, 12, 14, 21, 16, 20, 15, 19, 18, 17}, {1, 2, 4, 5, 7, 3, 6, 8, 9, 11, 13, 10, 12, 14, 21, 16, 20, 15, 19, 18, 17}, {2, 1, 4, 5, 6, 3, 7, 9, 8, 11, 10, 12, 14, 13, 16, 17, 15, 18, 21, 20, 19}, {2, 1, 4, 5, 6, 3, 7, 8, 9, 11, 10, 12, 14, 13, 15, 17, 16, 18, 21, 20, 19}, {1, 2, 3, 5, 7, 4, 6, 9, 8, 10, 11, 12, 14, 13, 15, 17, 16, 18, 21, 20, 19}, {1, 2, 3, 5, 7, 4, 6, 8, 9, 10, 11, 12, 13, 14, 15, 17, 16, 18, 21, 20, 19}, {2, 1, 3, 5, 6, 4, 7, 8, 9, 10, 11, 12, 13, 14, 15, 17, 16, 18, 21, 20, 19}, {1, 2, 3, 5, 6, 4, 7, 8, 9, 10, 11, 12, 13, 14, 15, 17, 16, 18, 21, 20, 19}, {1, 2, 3, 4, 7, 5, 6, 8, 9, 10, 11, 12, 13, 14, 15, 17, 16, 18, 21, 20, 19}, {1, 2, 3, 4, 7, 5, 6, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 21, 20, 19}, {1, 2, 3, 4, 7, 5, 6, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 21, 20, 19}, {1, 2, 3, 4, 7, 5, 6, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 21, 20, 19}, {2, 1, 3, 4, 7, 6, 5, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 21, 20, 19}, {1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 21, 20, 19}]}; names = { Sequence[ "Verstappen", "Hamilton", "Bottas", "Perez", "Sainz", "Norris", "Leclerc", "Ricciardo", "Gasly", "Alonso", "Ocon", "Vettel", "Stroll", "Tsunoda", "Russell", "Räikkönen", "Latifi", "Giovinazzi", "Schumacher", "Kubica", "Mazepin"]}; bottomticks = { Sequence[ "R1", "R2", "R3", "R4", "R5", "R6", "R7", "R8", "R9", "R10", "R11", "R12", "R13", "R14", "R15", "R16", "R17", "R18", "R19", "R20", "R21", "R22"]}; colors = { Sequence[ RGBColor[0.923284619564521, 0.05454192743935127, 0.0814920949716067], RGBColor[ 0.5105957709085847, 0.6715297297502201, 0.24579606302315704`], RGBColor[ 0.37579063054175044`, 0.5424197770052317, 0.7716363577119358], RGBColor[0.9508782758929515, 0.871949734091354, 0.6894002855819721], RGBColor[0.45388557350290637`, 0.7323511130592646, 0.729842591163625], RGBColor[ 0.017695711258429503`, 0.8429086640934933, 0.28342811945547774`], RGBColor[0.8819624090762643, 0.952577551567195, 0.41564000700926296`], RGBColor[ 0.34752774499585004`, 0.9430975425759229, 0.10640314949290386`], RGBColor[ 0.8142899870201019, 0.20262259601577903`, 0.9902000983484553], RGBColor[ 0.4076090667336243, 0.46126540889375645`, 0.2018816516002051], RGBColor[0.4464475396537422, 0.4880790507231303, 0.8275450181456445], RGBColor[ 0.9669639823923932, 0.12471467999172203`, 0.7951473618640772], RGBColor[ 0.12827604656553504`, 0.13945177805919107`, 0.007989268250494952], RGBColor[ 0.2661757105429552, 0.36564067697902547`, 0.7470323888241366], RGBColor[ 0.055522580891430584`, 0.7946147383342126, 0.29137376095080936`], RGBColor[0.9096774766810372, 0.3581287881994548, 0.9504802240427048], RGBColor[ 0.17576707362350263`, 0.5485610816923117, 0.4847776184457604], RGBColor[0.398911430525863, 0.3070724739095163, 0.20259200564879687`], RGBColor[0.33131655057736453`, 0.089494806900148, 0.7399420215503181], RGBColor[ 0.47165068962248013`, 0.6506895701652124, 0.3777454092194852], RGBColor[ 0.8241501207375095, 0.10507253836965691`, 0.3978143167146877]]}; ResourceFunction["RankChart"][ranking, "Names" -> names, "BottomTicks" -> bottomticks, "Thickness" -> .008, "PointSize" -> .02, "Colors" -> colors, FrameLabel -> {{Style["drivers", 12, Bold, Gray], None}, {None, Style["The 2021 FIA F1 Driver Standings", 18, Bold, Black]}}, ImageSize -> Large]
Out[7]=

Publisher

Kotaro Okazaki

Version History

  • 1.0.0 – 06 February 2023

Related Resources

License Information