10 lines
284 B
Smalltalk
10 lines
284 B
Smalltalk
accessing
|
|
exportRetweetsHistogramWithBars: aNumberOfBars
|
|
|
|
| retweetsDict |
|
|
retweetsDict := {
|
|
'messagesType' -> 'retweets'.
|
|
'extent' -> (800@200).
|
|
'color' -> (Color r:(217/255) g:(56/255) b: (124/255))
|
|
} asDictionary.
|
|
^ self exportHistogramFor: retweetsDict By: aNumberOfBars |