22 Apr
2014
22 Apr
'14
7:21 p.m.
Yes, it works!
Alexandre
On Apr 22, 2014, at 2:20 PM, Pablo Estefó <pestefo(a)gmail.com> wrote:
On Apr 21, 2014, at 18:26, Alexandre Bergel <alexandre.bergel(a)me.com> wrote:
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
Strange, it does not work for me?
-=-=-=-=-=-=-=-=-=
| values builder |
values := #( #(1 3 9) #(3 2 7) #(5 14 5) #(6 10 7) #(7 9 9) #(8 8 10) ).
builder := GET2Scatterplot data: values.
builder
x: #first;
y: #second;
r: [:v | v third * 4];
color: (Color brown alpha:0.4).
builder showValues: #third.
builder open
-=-=-=-=-=-=-=-=-=
I see no labels. Maybe this is due to my last change. Each circle should have a model
(i.e., not nil value)
Each one has its model. The problem was that the case for positioning at center
(isCenter) was missing.
I added it and committed it.
Cheers,
Pablo
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
On Apr 21, 2014, at 4:59 PM, Pablo Estefó <pestefo(a)gmail.com> wrote:
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev Hi everyone,
On Apr 21, 2014, at 10:53, Alexandre Bergel <alexandre.bergel(a)me.com> wrote:
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev Indeed, this Roassal tip#2 is very hacky.
We will have to design something cleaner on some point…
I think “showValues” could be a proper name for that.
I implemented it for GraphET2 (version 50).
=.=.=.
| builder |
builder := GET2HorizontalBar data: #(10 12 13 200 150 -13 149 -151).
builder showValues.
builder open
=.=.=.
<PastedGraphic-3.tiff>
Another example
=.=.=.
| values builder |
values := #( #(1 3 9) #(3 2 7) #(5 14 5) #(6 10 7) #(7 9 9) #(8 8 10) ).
builder := GET2Scatterplot data: values.
builder
x: #first;
y: #second;
r: [:v | v third * 4];
color: (Color brown alpha:0.4).
builder showValues: #third.
builder open
=.=.=.
<PastedGraphic-4.tiff>
What do you think?
Cheers,
Pablo
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
On Apr 21, 2014, at 10:12 AM, Daniel Aviv Notario <daniel_avivnotario(a)hotmail.com>
wrote:
> Just for the record, if you want to do that with GraphET, you should use the message
modelAxis, which does practically the same, but the label sticks in the axis, with
negative numbers having it over the axis and positive numbers below the axis.
>
> Here's an example:
>
> | diagram |
> diagram := GETDiagramBuilder new.
> diagram verticalBarDiagram
> models: (1 to: 10);
> modelAxis.
> diagram open
>
> resulting in:
>
>
https://www.facebook.com/ObjectProfile/photos/pb.340543479365589.-220752000…
>
>
> ;) -Daniel
>
> From: alexandre.bergel(a)me.com
> Date: Sun, 20 Apr 2014 22:25:18 -0300
> To: moose-dev(a)iam.unibe.ch
> Subject: [Moose-dev] Re: Roassal Tip #2: Labeling bar with GraphET.
>
> On any element.
>
> Try this:
>
> -=-=-=-=-=-=-=-=-=-=-=-=
> | v es |
> v := RTView new.
> v @ RTDraggableView.
> es := (RTEllipse new size: #numberOfMethods) elementsOn: RTObject withAllSubclasses.
> v addAll: es.
>
> es @ RTPopup @ RTLabelled @ RTDraggable.
> RTFlowLayout new maxWidth: 900; gapSize: 50; on: es.
>
> v open
> -=-=-=-=-=-=-=-=-=-=-=-=
>
> <Screen Shot 2014-04-20 at 10.23.14 PM.png>
>
> Alexandre
>
>
> On Apr 20, 2014, at 9:06 PM, Leo Perard <leo.perard(a)gmail.com> wrote:
>
> Looks pretty cool !
> Can we use on any RTShape or only RTBox ?
>
>
> On Sun, Apr 20, 2014 at 11:40 PM, Alexandre Bergel <alexandre.bergel(a)me.com>
wrote:
> Roassal Tip #2: Labeling bar with GraphET.
> You can use @RTLabelled for each bar elements. Consider the following example:
>
> -=-=-=-=-=-=-=-=-=
> | diagram |
> diagram := GET2DiagramBuilder new.
> diagram horizontalBarDiagram
> models: #(10 12 13 200 150 -13 149 -151);
> regularAxis.
> diagram build.
>
> "Pick the horizontal bars and add a label"
> diagram view elements do: [ :e |
> (e shape class == RTBox)
> ifTrue: [ e @ RTLabelled new right ]
> ].
> diagram view open
> -=-=-=-=-=-=-=-=-=
> <10168048_620580701361864_1868405001679336135_n.png>
>
>
https://www.facebook.com/ObjectProfile/photos/a.341189379300999.82969.34054…
>
> Cheers,
> Alexandre
>
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel http://www.bergel.eu
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
> _______________________________________________
> Moose-dev mailing list
> Moose-dev(a)iam.unibe.ch
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev
>
>
>
>
> --
> Leo Perard
> _______________________________________________
> Moose-dev mailing list
> Moose-dev(a)iam.unibe.ch
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev
>
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel http://www.bergel.eu
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
> _______________________________________________ Moose-dev mailing list
Moose-dev@iam.unibe.chhttps://www.iam.unibe.ch/mailman/listinfo/moose-dev
> _______________________________________________
> Moose-dev mailing list
> Moose-dev(a)iam.unibe.ch
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev