Reposting here, just in case you missed it :)
Doru
---------- Forwarded message ----------
From: Tudor Girba <tudor(a)tudorgirba.com>
Date: Sat, Jan 4, 2014 at 10:39 PM
Subject: Re: [Pharo-dev] Feature for request for GraphET?
To: Pharo Development List <pharo-dev(a)lists.pharo.org>
Here is one thing I would want: a correspondent Graph-ET functionality to
make something like this EyeSee script work as in the first attached
picture.
renderer := ESDiagramRenderer new.
grouped := { #item1->{10 . 12 . 11 . 14 } . #item2-> { 1 . 1 . 20 } .
#item3->{ 1 . 1 . 1 . 1 . 1} }.
diag := (ESVerticalBarDiagram new)
identifier: [:each | each key ];
y: [:each | each value size];
yAxisLabel: 'Count';
valueAxis;
rightYAxis;
defaultColor: Color veryVeryLightGray;
axisColor: Color veryVeryLightGray;
models: grouped;
rotatedLabels: true;
yourself.
diag2 := (ESVerticalBarDiagram new)
y: [:each | each value sum];
regularAxis;
yAxisLabel: 'Sum';
gapFraction: 2 / 3;
defaultColor: (Color red);
axisColor: (Color red);
models: grouped;
yourself.
(renderer compositeDiagram)
add: diag;
add: diag2.
renderer open
[image: Inline image 2]
The best I could produce with Graph-ET is this (I commented out the message
to which I did not find a correspondent):
builder := GETDiagramBuilder new.
grouped := { #item1->{10 . 12 . 11 . 14 } . #item2-> { 1 . 1 . 20 } .
#item3->{ 1 . 1 . 1 . 1 . 1} }.
diag := (GETVerticalBarDiagram new)
"identifier: [:each | each key ];"
y: [:each | each value size];
yAxisLabel: 'Count';
valueAxisLine;
"rightYAxis;"
color: Color veryLightGray;
"axisColor: Color veryLightGray;"
models: grouped;
"rotatedLabels: true;"
yourself.
diag2 := (GETVerticalBarDiagram new)
y: [:each | each value sum];
regularAxis;
yAxisLabel: 'Sum';
"gapFraction: 2 / 3;"
color: (Color red);
"axisColor: (Color red);"
models: grouped;
yourself.
(builder compositeDiagram)
add: diag;
add: diag2.
builder open
[image: Inline image 4]
Cheers,
Doru
On Thu, Jan 2, 2014 at 7:24 PM, Alexandre Bergel <alexandre.bergel(a)me.com>wrote;wrote:
Hi!
Daniel is looking for usage scenarios with GraphET. It would be great to
hear about your need.
Currently, we will work on:
- PDF Export using Artefact
- support for legend
- smarter way to put labels on axis
Anything else?
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel
http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
--
www.tudorgirba.com
"Every thing has its own flow"
--
www.tudorgirba.com
"Every thing has its own flow"