Hi!I have added a name cloud builder in Roassal. Maybe some of you will find it usefulIt is very primitive and does do much, but it does the primitive things :-)Here is an example:=-=-=-=-==-=-=-=-==-=-=-=-==-=-=-=-=RTNameCloud new
addString: 'open
| v shape |
v := RTView new.
shape := RTLabel new height: [ :assoc | assoc value ]; text: #key.
v addAll: (shape elementsOn: table associations).
RTFlowLayout on: v elements.
v open';
open=-=-=-=-==-=-=-=-==-=-=-=-==-=-=-=-=It produces:A slightly more complicated example:=-=-=-=-==-=-=-=-==-=-=-=-==-=-=-=-=| b |
b := RTNameCloud new.
b addStrings: (RTNameCloud methods collect: #getSource).
b open=-=-=-=-==-=-=-=-==-=-=-=-==-=-=-=-=produces:We did this name cloud builder because we had a need to process text extracted from StackExchange. We added a dictionary containing words that are not interesting. For example:=-=-=-=-==-=-=-=-==-=-=-=-==-=-=-=-=
| b |
b := RTNameCloud new.
b minHeight: 20.
b maxHeight: 30.
b addString: 'I am not that tall but I speak many languages. But I have tall legs and big feet'.
b open=-=-=-=-==-=-=-=-==-=-=-=-==-=-=-=-=
It produces:Words such as ‘I’, ‘not’, ‘that’, ‘but’ are not shown.Cheers,Alexandre--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev