accessing
exportTweetsHistogramWithBars: aNumberOfBars

	| tweetsDict |
	tweetsDict := {
		'messagesType' -> 'tweets'.
		'extent' -> (800@200).
		'color' -> (Color r:(91/255) g:(131/255) b:(222/255))
	} asDictionary.
	^ self exportHistogramFor: tweetsDict By: aNumberOfBars