Obtén el artículo con el mayor valor en una colección de bolsos en Raku

my $coll=bag <1 2 2 3 2 4 4 2 2>;
say $coll; # => Bag(1, 2(5), 3, 4(2))

¿Cómo obtener el artículo (clave) con el mayor valor, es decir, el 2(5)de esta colección de bolsos?

(Opcional) ¿Hay alguna forma de decirle a la Bolsa que cuente solo aquellos elementos que son sucesivos y que no tenga en cuenta todos los que no son sucesivos para que el resultado sea así Bag(2(4), 4(2))?

raku Lars Malmsteen
fuente

"prescindir de lo que no son sucesivos" ... .oO (sólo mantener un valor si es la misma, ya sea como la anterior o la siguiente) ...<1 2 2 3 2 4 4 2 2> .rotor(3=>-2, :partial) .map: { .[1] if .[1] === .[0] | .[2] }

raiph

Respuestas:

Para responder a su primera pregunta, hay un método para eso:

say $coll.maxpairs; # 2 => 5

Para responder a su segunda pregunta: no, no puede. Solo puede idear alguna lógica que preprocese los valores antes de llegar al Bag.

 <1 2 2 3 2 4 4 2 2>.map( *somelogic* ).Bag

Dejar la parte * somelógica * como ejercicio para el lector.

Elizabeth Mattijsen
fuente

Habiéndome concentrado en el uso de, Bagno he encontrado el maxpairsmétodo. Resulta que es un método general que se aplica a cualquier lista de tipo asociativo. No lo sabia Bueno saber.

Lars Malmsteen

Tal vez eso sea digno de un problema de documentación :-)

Elizabeth Mattijsen