# [Wolfram Language (Mathematica)], 67 bytes ⌊{{{{.1},1},,3},{,2},,7.77}~Extract~Sort[Last/@Tally@#2]+.01#⌋& [Try it online!][TIO-jzjc1qqm] [Wolfram Language (Mathematica)]: https://www.wolfram.com/wolframscript/ [TIO-jzjc1qqm]: https://tio.run/##y00syUjNTSzJTE78n2b7/1FPVzUQ6BnW6gCRjnGtTrWOEZBhrmduXlvnWlFSlJhcUhecX1QS7ZNYXKLvEJKYk1PpoGwUq61nYKj8qKdb7X9AUWZeSbSyrl2ag4NyrJq@QzVXtYGCTrWhjpGOiY5pba0OV7WlqU61sQ5YBMw3AvKNdIyB8sZwPlAtEELkDXQUgPKmQPVGEHkjkHlgCOEbg8wDQ4j5lkh8rtr/AA "Wolfram Language (Mathematica) – Try It Online"