You can have legends, such as in:
-=-=-=-=-=-=-=-=-=-=-=-=
b := RTGrapher new.
b extent: 300 @ 300.
(Array with: Color red with: Color blue with: Color green with: Color yellow) doWithIndex: [ :color :i |
ds := RTData new.
ds label: 'x^', i asString.
ds dotShape ellipse size: 0.
ds points: (0.0 to: 10.0 by: 0.1).
ds connectColor: color.
ds x: #yourself.
ds y: [ :v | v raisedTo: i ].
b add: ds.
].
b axisXWithNumberOfTicks: 3.
b axisYWithNumberOfTicks: 4.
b legend right.
^ b
-=-=-=-=-=-=-=-=-=-=-=-=
Here is another example:
-=-=-=-=-=-=-=-=
b := RTGrapher new.
ds := RTData new.
ds label: 'Classes'.
ds points: (Collection withAllSubclasses reverseSortedAs: #numberOfMethods).
ds barShape color: Color red.
ds y: #numberOfMethods.
b add: ds.
b legend
addText: 'Size of collection classes'.
b
-=-=-=-=-=-=-=-=
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel
http://www.bergel.eu^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
_______________________________________________