Fixing quotes report data and Modifying retweets report data.
This commit is contained in:
parent
1dec7081e4
commit
d2025d8aa9
@ -4,8 +4,8 @@ quotesReportData
|
|||||||
| tempDict labels xAxis |
|
| tempDict labels xAxis |
|
||||||
tempDict := self quotesSortedByOccurrences.
|
tempDict := self quotesSortedByOccurrences.
|
||||||
|
|
||||||
tempDict size > 50 ifTrue: [
|
tempDict size > 10 ifTrue: [
|
||||||
tempDict := (tempDict associations copyFrom: 1 to: 50) asOrderedDictionary ].
|
tempDict := (tempDict associations copyFrom: 1 to: 10) asOrderedDictionary ].
|
||||||
|
|
||||||
labels := tempDict keys.
|
labels := tempDict keys.
|
||||||
labels := labels collect: [ :profile | ($' asString), '@', profile, ($' asString) ].
|
labels := labels collect: [ :profile | ($' asString), '@', profile, ($' asString) ].
|
||||||
|
@ -3,6 +3,10 @@ retweetsReportData
|
|||||||
|
|
||||||
| tempDict labels xAxis |
|
| tempDict labels xAxis |
|
||||||
tempDict := self retweetsSortedByOccurrences.
|
tempDict := self retweetsSortedByOccurrences.
|
||||||
|
|
||||||
|
tempDict size > 10 ifTrue: [
|
||||||
|
tempDict := (tempDict associations copyFrom: 1 to: 10) asOrderedDictionary ].
|
||||||
|
|
||||||
labels := tempDict keys.
|
labels := tempDict keys.
|
||||||
labels := labels collect: [ :profile | ($' asString), '@', profile, ($' asString) ].
|
labels := labels collect: [ :profile | ($' asString), '@', profile, ($' asString) ].
|
||||||
xAxis := tempDict values.
|
xAxis := tempDict values.
|
||||||
|
Loading…
Reference in New Issue
Block a user