Sure, this is easy. Axis supports a method called #labelConversion: [ :aNumericalValue | … ]
You need to provide a bloc that returns a string.

For example:


| data b s |
data := #(#(c1 0 5) #(c1 6 8) #(c2 0 5) #(c2 8 10) #(c3 0 10) #(c4 5 10) #(c5 5 8)).

b := RTTimeline new.

s := RTTimelineSet new.
s objects: data.
s lineIdentifier: #first.
s start: #second.
s end: #third.
b add: s.

b axisY
title: 'Task'.
b axisX 
numberOfLabels: 10;
title: 'Week day';
labelConversion: [ :v | v \\ 7 + 1 ]. 

b build.
^ b view

Does this help?

Cheers,
Alexandre



On Aug 1, 2015, at 12:48 AM, H. Hirzel <hannes.hirzel@gmail.com> wrote:

The SVG export accessible through the '...' menu works fine.

A new question regarding the labeling of the x-axis.

How do I specify that I want to see months

   8  9   10  11  12

only?

data := #(     #(WP1 8 12)      #(WP2 8 10)     #(WP3 10 11)
#(WP4 11 12)



And is something like this possible?


   8  9   10  11  12  1   2   3   4


--Hannes


On 7/31/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
The ‘…’ button, top right of a GTInspector that is showing a Roassal
visualization.

https://dl.dropboxusercontent.com/u/31543901/TMP/Screen%20Shot%202015-07-30%20at%2012.33.23%20PM.png

Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.



On Jul 30, 2015, at 2:25 PM, H. Hirzel <hannes.hirzel@gmail.com> wrote:

Which menu? Could you describe it verbally please where to click? The
picture did not come through.

--Hannes

On 7/30/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Simply use the menu:


Cheers,
Alexandre

--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.



On Jul 30, 2015, at 11:59 AM, H. Hirzel <hannes.hirzel@gmail.com>
wrote:

Alexandre,

This is really agile ... version 1005 of Roassal loaded and version
305 of Trachel :-)

The GANTT chart works fine, see screen shot.

How do I export it as SVG code in Roassal?

--Hannes

On 7/29/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Pure agile development: the latest version is the one that count.
You need to update two packages: Roassal2 and Trachel.

Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.



On Jul 29, 2015, at 3:24 PM, H. Hirzel <hannes.hirzel@gmail.com>
wrote:

Or a configuration? Which one?

--HH

On 7/29/15, H. Hirzel <hannes.hirzel@gmail.com> wrote:
Thanks for the updated GANTT script.

My question was about the version of Roassal to load.

Which one?
I just go for version 1000?

See screenshot.

--Hannes

On 7/29/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
You should load the latest Roassal.

How do I do that? I just loaded Roassal into a fresh Pharo4.0
image
and RTTimeLine is not included.

We did some refactoring.
Instead, you should do:

-=-=-=-=-=-=-=-=
data := #(#(WP1 0 5) #(WP2 5 8) #(WP3 7 10)).

b := RTTimeline new.

s := RTTimelineSet new.
s objects: data.
s lineIdentifier: #first.
s start: #second.
s end: #third.
b add: s.

b axisX
numberOfLabels: 5;
labelRotation: -45;
labelConversion: [ :v | Date year: 2015 day: v ].

d := RTVerticalTickLineDecorator new.
d shape line color: Color white.
b addDecorator: d.
b
-=-=-=-=-=-=-=-=



The class RTTimelineExample contains many examples

Let us know how it goes

Alexandre



Alexandre



Le 9 mai 2015 à 19:06, H. Hirzel <hannes.hirzel@gmail.com> a
écrit
:

Thank you for the examples, Alexandre!

I have Pharo 4.0 with Roassal 2.0 installed
(AlexandreBergel.718)

I paste the following into a 'Playground' window and 'do it'.

b := RTTimeLine new.

b addEntry: (RTTimeLineEntry new identifier: #WP1; start: 0;
end:
5).
b addEntry: (RTTimeLineEntry new identifier: #WP2; start: 5;
end:
8).
b addEntry: (RTTimeLineEntry new identifier: #WP3; start: 7;
end:
10).

b axisX numberOfLabels: 5.
b

I get the error message  that RTTimeLine is not known.

What am I missing?

--Hannes


On 5/8/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Hi Hannes!

Here is a first shoot paired-programmed with Juraj using
Roassal:

-=-=-=-=-=-=-=-=-=-=-=-=
b := RTTimeLine new.

b addEntry: (RTTimeLineEntry new identifier: #WP1; start: 0;
end:
5).
b addEntry: (RTTimeLineEntry new identifier: #WP2; start: 5;
end:
8).
b addEntry: (RTTimeLineEntry new identifier: #WP3; start: 7;
end:
10).

b axisX numberOfLabels: 5.
b
-=-=-=-=-=-=-=-=-=-=-=-=



Here some slightly more elaborated example:

-=-=-=-=-=-=-=-=-=-=-=-=
“One color per entry"
| b d |
b := RTTimeLine new.
b addEntry: (RTTimeLineEntry new identifier: #c1; start: 0;
end:
5).
b addEntry: (RTTimeLineEntry new identifier: #c1; start: 6;
end:
8).

b addEntry: (RTTimeLineEntry new identifier: #c2; start: 0;
end:
5).
b addEntry: (RTTimeLineEntry new identifier: #c2; start: 8;
end:
10).

b addEntry: (RTTimeLineEntry new identifier: #c3; start: 0;
end:
10).

b addEntry: (RTTimeLineEntry new identifier: #c4; start: 5;
end:
10).

b addEntry: (RTTimeLineEntry new identifier: #c5; start: 5;
end:
8).

d := RTVerticalTickLineDecorator new.
d shape line color: Color white.
b addDecorator: d.
b axisX
  numberOfLabels: 5;
  labelRotation: -45;
  labelConversion: [ :v | Date year: 2015 day: v ].

b shape color: (RTMultiLinearColorForIdentity new objects: b
entries).
b
-=-=-=-=-=-=-=-=-=-=-=-=



One color per timeline


-=-=-=-=-=-=-=-=-=-=-=-=
| b |
b := RTTimeLine new.
b addEntry: (RTTimeLineEntry new identifier: #c1; start: 0;
end:
5).
b addEntry: (RTTimeLineEntry new identifier: #c1; start: 6;
end:
8).

b addEntry: (RTTimeLineEntry new identifier: #c2; start: 0;
end:
5).
b addEntry: (RTTimeLineEntry new identifier: #c2; start: 8;
end:
10).

b addEntry: (RTTimeLineEntry new identifier: #c3; start: 0;
end:
10).

b addEntry: (RTTimeLineEntry new identifier: #c4; start: 5;
end:
10).

b addEntry: (RTTimeLineEntry new identifier: #c5; start: 5;
end:
8).

d := RTVerticalTickLineDecorator new.
d shape line color: Color white.
b addDecorator: d.
b axisX
  numberOfLabels: 5;
  labelRotation: -45;
  labelConversion: [ :v | Date year: 2015 day: v ].

b shape color: (RTMultiLinearColorForIdentity new command:
#identifier;
objects: #(c1 c2 c3 c4 c5)).
b
-=-=-=-=-=-=-=-=-=-=-=-=


Age of some classes:
-=-=-=-=-=-=-=-=-=-=-=-=
| b |
b := RTTimeLine new.
b extent: 500 @ 500.
((RTShape withAllSubclasses sortedAs: #ageInDaysRounded)
select:
#hasMethods)
  do: [ :cls |
      e := RTTimeLineEntry new.
      e identifier: cls.
      e start: cls computeYoungestMethod ageInDays.
      e end: cls computeOldestMethod ageInDays.
      b addEntry: e ].
b
-=-=-=-=-=-=-=-=-=-=-=-=



All these examples are in the Roassal time line example menu.

This is still an early version. Let us know how it goes!
https://www.facebook.com/ObjectProfile/posts/840542572699008

Cheers,
Alexandre

--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.



On May 7, 2015, at 4:25 PM, H. Hirzel
<hannes.hirzel@gmail.com>
wrote:

Hello

Has somebody done a GANTT chart?

GanttChartMorph openOn: aCollectionOfActivities

?

Activities have
- id
- description
- start date
- end date
?

Regards

Hannes

_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev



_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev



<Roassal2_configurations_Screenshot from 2015-07-29
18:23:50.png>_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev


<Pharo_Roassal_GANTT_chart_Screenshot from 2015-07-30 14:55:31.png>






<Roassal_timeline_x_axis_question_Screenshot from 2015-08-01.png>

-- 
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel  http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.