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^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
 _______________________________________________