Posted by Stephan Eggermont-3 on Feb 07, 2015; 8:49am
URL: https://forum.world.st/Image-growing-size-tp4803428p4804275.html

You might want to inspect this to see if this gets you something
interesting.

(Object allSubclasses collect: [ :aClass |
        aClass -> aClass allInstances size])
        sort: [ :a :b | a value > b value ]

It takes some time to run, especially in a larger image.

Stephan