Smalltalk › Pharo › Pharo Smalltalk Developers

[ANN] Grouper

_‹ Previous Topic Next Topic _›

Classic

List

Threaded

6 messages Options

Julien Delplanque-2

[ANN] Grouper

Hello,

I made a small library that reify grouping (that one does via #groupBy: usually): Grouper https://github.com/juliendelplanque/Grouper

It is designed in the same spirit as SortFunction, but for grouping.

Quick example:

The following code snippet using Grouper:

(10 to: 50) groupUsing: [ :integer | integer asString first ].
"an OrderedDictionary(
  $1->#(10 11 12 13 14 15 16 17 18 19)
  $2->#(20 21 22 23 24 25 26 27 28 29)
  $3->#(30 31 32 33 34 35 36 37 38 39)
  $4->#(40 41 42 43 44 45 46 47 48 49)
  $5->#(50))"

is equivalent to the following code snippet using built-in #groupedBy: method:

(10 to: 50) groupedBy: [ :integer | integer asString first ]
"an OrderedDictionary(
  $1->#(10 11 12 13 14 15 16 17 18 19)
  $2->#(20 21 22 23 24 25 26 27 28 29)
  $3->#(30 31 32 33 34 35 36 37 38 39)
  $4->#(40 41 42 43 44 45 46 47 48 49)
  $5->#(50))"

The advantage of using it is that it allows one to compose grouper objects.

Thus, it is easy to describe grouping on 2 or 3 levels.

Fore example:

The power of Grouper is that group description are first-class objects. Thus, it is possible to compose group descriptions in order to group a flat collection on multiple levels.

For example:

groupComposition := [ :integer | integer asString first ] grouper , [ :integer | integer asString second ].
(10 to: 50) groupUsing: groupComposition.
"an OrderedDictionary(
  $1->an OrderedDictionary(
    $0->#(10) $1->#(11) $2->#(12) $3->#(13) $4->#(14) $5->#(15) $6->#(16) $7->#(17) $8->#(18) $9->#(19))
  $2->an OrderedDictionary(
    $0->#(20) $1->#(21) $2->#(22) $3->#(23) $4->#(24) $5->#(25) $6->#(26) $7->#(27) $8->#(28) $9->#(29))
  $3->an OrderedDictionary(
    $0->#(30) $1->#(31) $2->#(32) $3->#(33) $4->#(34) $5->#(35) $6->#(36) $7->#(37) $8->#(38) $9->#(39))
  $4->an OrderedDictionary(
    $0->#(40) $1->#(41) $2->#(42) $3->#(43) $4->#(44) $5->#(45) $6->#(46) $7->#(47) $8->#(48) $9->#(49))
  $5->an OrderedDictionary($0->#(50)))"

On the github, there are more example showing how to build trees with custom objects.

Any feedback for this library is welcome.

I would like to propose it to Pharo in the near future because it would simplify a lot of code in DrTests (related to result tree views, the tree on the right of the UI).

I don't know if it will be possible before next release as we are in feature freeze.

Cheers,

Julien

Esteban A. Maringolo

Re: [ANN] Grouper

Hi Julien,

Interesting, in the last years I've been using a similar set of
classes that build groups, and can also nest them, but yours seems
more customizable.

Thank you for sharing it.

I'll give it a try!

Esteban A. Maringolo

On Mon, Dec 9, 2019 at 11:10 AM Julien Delplanque
<[hidden email]> wrote:

>
> Hello,
>
> I made a small library that reify grouping (that one does via #groupBy: usually): Grouper https://github.com/juliendelplanque/Grouper
>
> It is designed in the same spirit as SortFunction, but for grouping.
>
> Quick example:
>
> The following code snippet using Grouper:
>
> (10 to: 50) groupUsing: [ :integer | integer asString first ].
> "an OrderedDictionary(
> $1->#(10 11 12 13 14 15 16 17 18 19)
> $2->#(20 21 22 23 24 25 26 27 28 29)
> $3->#(30 31 32 33 34 35 36 37 38 39)
> $4->#(40 41 42 43 44 45 46 47 48 49)
> $5->#(50))"
>
> is equivalent to the following code snippet using built-in #groupedBy: method:
>
> (10 to: 50) groupedBy: [ :integer | integer asString first ]
> "an OrderedDictionary(
> $1->#(10 11 12 13 14 15 16 17 18 19)
> $2->#(20 21 22 23 24 25 26 27 28 29)
> $3->#(30 31 32 33 34 35 36 37 38 39)
> $4->#(40 41 42 43 44 45 46 47 48 49)
> $5->#(50))"
>
> The advantage of using it is that it allows one to compose grouper objects.
>
> Thus, it is easy to describe grouping on 2 or 3 levels.
>
> Fore example:
>
> The power of Grouper is that group description are first-class objects. Thus, it is possible to compose group descriptions in order to group a flat collection on multiple levels.
>
> For example:
>
> groupComposition := [ :integer | integer asString first ] grouper , [ :integer | integer asString second ].
> (10 to: 50) groupUsing: groupComposition.
> "an OrderedDictionary(
> $1->an OrderedDictionary(
> $0->#(10) $1->#(11) $2->#(12) $3->#(13) $4->#(14) $5->#(15) $6->#(16) $7->#(17) $8->#(18) $9->#(19))
> $2->an OrderedDictionary(
> $0->#(20) $1->#(21) $2->#(22) $3->#(23) $4->#(24) $5->#(25) $6->#(26) $7->#(27) $8->#(28) $9->#(29))
> $3->an OrderedDictionary(
> $0->#(30) $1->#(31) $2->#(32) $3->#(33) $4->#(34) $5->#(35) $6->#(36) $7->#(37) $8->#(38) $9->#(39))
> $4->an OrderedDictionary(
> $0->#(40) $1->#(41) $2->#(42) $3->#(43) $4->#(44) $5->#(45) $6->#(46) $7->#(47) $8->#(48) $9->#(49))
> $5->an OrderedDictionary($0->#(50)))"
>
> On the github, there are more example showing how to build trees with custom objects.
>
> Any feedback for this library is welcome.
>
> I would like to propose it to Pharo in the near future because it would simplify a lot of code in DrTests (related to result tree views, the tree on the right of the UI).
>
> I don't know if it will be possible before next release as we are in feature freeze.
>
> Cheers,
>
> Julien

Julien Delplanque-2

Re: [ANN] Grouper

Hello Esteban,

Le 9/12/19 à 19:22, Esteban Maringolo a écrit :
> Hi Julien,
>
> Interesting, in the last years I've been using a similar set of
> classes that build groups, and can also nest them, but yours seems
> more customizable.
Cool! Is your code available somewhere? Maybe our ideas are different so
Grouper could profit from that?
>
> Thank you for sharing it.
>
> I'll give it a try!

Cool. :-)

Julien

Esteban A. Maringolo

Re: [ANN] Grouper

Hi Julien,

The code is not public and was done for a former customer, so not readily
shareable in public.

We can talk in Discord to share some ideas, but as customizable as
Grouper is, I could use my own "group" objects as nodes.

Once I get back to modify something in that part of my code, I'll see
how to integrate into what you've done.

Regards!

Esteban A. Maringolo

On Mon, Dec 9, 2019 at 3:52 PM Julien Delplanque
<[hidden email]> wrote:

>
> Hello Esteban,
>
> Le 9/12/19 à 19:22, Esteban Maringolo a écrit :
> > Hi Julien,
> >
> > Interesting, in the last years I've been using a similar set of
> > classes that build groups, and can also nest them, but yours seems
> > more customizable.
> Cool! Is your code available somewhere? Maybe our ideas are different so
> Grouper could profit from that?
> >
> > Thank you for sharing it.
> >
> > I'll give it a try!
>
> Cool. :-)
>
> Julien
>
>

Pharo Smalltalk Developers mailing list

Re: [ANN] Grouper

In reply to this post by Julien Delplanque-2

This is cool. Rails has this kind of capability and I miss it elsewhere.

On Dec 9, 2019, at 6:08 AM, Julien Delplanque <[hidden email]> wrote:
Hello,
I made a small library that reify grouping (that one does via #groupBy: usually): Grouper https://github.com/juliendelplanque/Grouper

It is designed in the same spirit as SortFunction, but for grouping.

Quick example:
The following code snippet using Grouper:
(10 to: 50) groupUsing: [ :integer | integer asString first ].
"an OrderedDictionary(
  $1->#(10 11 12 13 14 15 16 17 18 19)
  $2->#(20 21 22 23 24 25 26 27 28 29)
  $3->#(30 31 32 33 34 35 36 37 38 39)
  $4->#(40 41 42 43 44 45 46 47 48 49)
  $5->#(50))"
is equivalent to the following code snippet using built-in #groupedBy: method:
(10 to: 50) groupedBy: [ :integer | integer asString first ]
"an OrderedDictionary(
  $1->#(10 11 12 13 14 15 16 17 18 19)
  $2->#(20 21 22 23 24 25 26 27 28 29)
  $3->#(30 31 32 33 34 35 36 37 38 39)
  $4->#(40 41 42 43 44 45 46 47 48 49)
  $5->#(50))"
The advantage of using it is that it allows one to compose grouper objects.
Thus, it is easy to describe grouping on 2 or 3 levels.
Fore example:
The power of Grouper is that group description are first-class objects. Thus, it is possible to compose group descriptions in order to group a flat collection on multiple levels.
For example:
groupComposition := [ :integer | integer asString first ] grouper , [ :integer | integer asString second ].
(10 to: 50) groupUsing: groupComposition.
"an OrderedDictionary(
  $1->an OrderedDictionary(
    $0->#(10) $1->#(11) $2->#(12) $3->#(13) $4->#(14) $5->#(15) $6->#(16) $7->#(17) $8->#(18) $9->#(19))
  $2->an OrderedDictionary(
    $0->#(20) $1->#(21) $2->#(22) $3->#(23) $4->#(24) $5->#(25) $6->#(26) $7->#(27) $8->#(28) $9->#(29))
  $3->an OrderedDictionary(
    $0->#(30) $1->#(31) $2->#(32) $3->#(33) $4->#(34) $5->#(35) $6->#(36) $7->#(37) $8->#(38) $9->#(39))
  $4->an OrderedDictionary(
    $0->#(40) $1->#(41) $2->#(42) $3->#(43) $4->#(44) $5->#(45) $6->#(46) $7->#(47) $8->#(48) $9->#(49))
  $5->an OrderedDictionary($0->#(50)))"
On the github, there are more example showing how to build trees with custom objects.

Any feedback for this library is welcome.
I would like to propose it to Pharo in the near future because it would simplify a lot of code in DrTests (related to result tree views, the tree on the right of the UI).
I don't know if it will be possible before next release as we are in feature freeze.
Cheers,
Julien

Pharo Smalltalk Developers mailing list

Re: [ANN] Grouper

In reply to this post by Julien Delplanque-2

Pretty cool!

Alexandre

http://bergel.eu

Le 9 déc. 2019 à 11:10, Julien Delplanque <[hidden email]> a écrit :

Hello,

I made a small library that reify grouping (that one does via #groupBy: usually): Grouper https://github.com/juliendelplanque/Grouper

It is designed in the same spirit as SortFunction, but for grouping.

Quick example:

The following code snippet using Grouper:
(10 to: 50) groupUsing: [ :integer | integer asString first ].
"an OrderedDictionary(
  $1->#(10 11 12 13 14 15 16 17 18 19)
  $2->#(20 21 22 23 24 25 26 27 28 29)
  $3->#(30 31 32 33 34 35 36 37 38 39)
  $4->#(40 41 42 43 44 45 46 47 48 49)
  $5->#(50))"
is equivalent to the following code snippet using built-in #groupedBy: method:
(10 to: 50) groupedBy: [ :integer | integer asString first ]
"an OrderedDictionary(
  $1->#(10 11 12 13 14 15 16 17 18 19)
  $2->#(20 21 22 23 24 25 26 27 28 29)
  $3->#(30 31 32 33 34 35 36 37 38 39)
  $4->#(40 41 42 43 44 45 46 47 48 49)
  $5->#(50))"
The advantage of using it is that it allows one to compose grouper objects.

Thus, it is easy to describe grouping on 2 or 3 levels.

Fore example:

The power of Grouper is that group description are first-class objects. Thus, it is possible to compose group descriptions in order to group a flat collection on multiple levels.

For example:
groupComposition := [ :integer | integer asString first ] grouper , [ :integer | integer asString second ].
(10 to: 50) groupUsing: groupComposition.
"an OrderedDictionary(
  $1->an OrderedDictionary(
    $0->#(10) $1->#(11) $2->#(12) $3->#(13) $4->#(14) $5->#(15) $6->#(16) $7->#(17) $8->#(18) $9->#(19))
  $2->an OrderedDictionary(
    $0->#(20) $1->#(21) $2->#(22) $3->#(23) $4->#(24) $5->#(25) $6->#(26) $7->#(27) $8->#(28) $9->#(29))
  $3->an OrderedDictionary(
    $0->#(30) $1->#(31) $2->#(32) $3->#(33) $4->#(34) $5->#(35) $6->#(36) $7->#(37) $8->#(38) $9->#(39))
  $4->an OrderedDictionary(
    $0->#(40) $1->#(41) $2->#(42) $3->#(43) $4->#(44) $5->#(45) $6->#(46) $7->#(47) $8->#(48) $9->#(49))
  $5->an OrderedDictionary($0->#(50)))"
On the github, there are more example showing how to build trees with custom objects.

Any feedback for this library is welcome.

I would like to propose it to Pharo in the near future because it would simplify a lot of code in DrTests (related to result tree views, the tree on the right of the UI).

I don't know if it will be possible before next release as we are in feature freeze.

Cheers,

Julien