Perl每周挑战284：幸运整数
💡
原文英文，约600词，阅读约需2分钟。
📝
内容提要
本文讨论了Perl每周挑战第284周的任务1：寻找幸运整数。幸运整数是指其在数组中出现的频率等于其值的整数。如果存在多个幸运整数，则返回最大的一个；如果没有，返回-1。示例输入包括(2, 2, 3, 4)和(1, 2, 2, 3, 3, 3)，输出分别为2和3。
🎯
关键要点
- 任务1：寻找幸运整数，幸运整数是指其在数组中出现的频率等于其值的整数。
- 如果存在多个幸运整数，则返回最大的一个；如果没有，返回-1。
- 示例输入包括(2, 2, 3, 4)和(1, 2, 2, 3, 3, 3)，输出分别为2和3。
- 程序使用Bag或哈希来统计频率，并通过过滤找到幸运整数。
- 在Raku和Perl中实现了寻找幸运整数的算法，输出结果一致。
❓
延伸问答
什么是幸运整数？
幸运整数是指其在数组中出现的频率等于其值的整数。
如何找到数组中的幸运整数？
可以使用哈希或Bag统计频率，然后过滤出频率等于值的整数，最后返回最大的幸运整数或-1。
如果数组中没有幸运整数，应该返回什么？
-1。
给出一个示例，如何找到幸运整数？
例如，对于输入(1, 2, 2, 3, 3, 3)，输出是3，因为2出现2次，3出现3次。
在Raku和Perl中，寻找幸运整数的实现有什么不同？
在Raku中使用Bag来统计频率，而在Perl中使用哈希来实现。
如何处理多个幸运整数的情况？
如果存在多个幸运整数，返回最大的一个。
➡️
