10 lines
273 B
Smalltalk
10 lines
273 B
Smalltalk
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 |