mondrian help

List overview All Threads
Download

newer

older

interesting paper

Issue 747 in moose-technology: We...

Usman Bhatti

9 Nov 2011 9 Nov '11

4:22 p.m.

I am working on this script to see dependencies of seaside and citezen... I would to group the nodes according to their names in Mondrian. Is it possible? Here is my script: view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; if: [:pack | pack name includesSubString: 'Citezen'] fillColor: Color red; if: [:pack | (pack name includesSubString: 'Seaside') and: [(pack name includesSubString: 'Citezen' ) not]] fillColor: Color lightBlue. view nodes: (model allPackages select: [:pack | ((pack name includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside']) or: [pack name includesSubString: 'Pier']]). view edgesToAll: #staticProviderPackages. view dominanceTreeLayout.. Like in the figure, I would like to group red nodes on the left and light blue nodes on the right and at the same time keeping dominanceTreeLayout. [image: Screen shot 2011-11-09 at 4.08.18 PM.png] thanx. Usman

Attachments:

attachment.htm (text/html — 1.5 KB)
Screenshot2011-11-09at4.08.18PM.png (image/png — 21.5 KB)

Show replies by date

Alexandre Bergel

9 Nov 9 Nov

4:50 p.m.

Sure. Something like: view node: 'left red node' forIt: [ view nodes: "your red nodes" ... view dominanceTreeLayout ]. view node: 'right blue node' forIt: [ view nodes: "your blue nodes" ... view dominanceTreeLayout ]. Does this answer to your question? Cheers, Alexandre On 9 Nov 2011, at 07:22, Usman Bhatti wrote:

...

I am working on this script to see dependencies of seaside and citezen... I would to group the nodes according to their names in Mondrian. Is it possible? Here is my script: view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; if: [:pack | pack name includesSubString: 'Citezen'] fillColor: Color red; if: [:pack | (pack name includesSubString: 'Seaside') and: [(pack name includesSubString: 'Citezen' ) not]] fillColor: Color lightBlue. view nodes: (model allPackages select: [:pack | ((pack name includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside']) or: [pack name includesSubString: 'Pier']]). view edgesToAll: #staticProviderPackages. view dominanceTreeLayout.. Like in the figure, I would like to group red nodes on the left and light blue nodes on the right and at the same time keeping dominanceTreeLayout. <Screen shot 2011-11-09 at 4.08.18 PM.png> thanx. Usman _______________________________________________ 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 ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.

Usman Bhatti

5:46 p.m.

Thanx Alex.. that helps. now I do not know how to draw edges from the nodes in different groupings (bigger rectangles). I tried various methods but I didn't succeed. [image: Screen shot 2011-11-09 at 5.45.09 PM.png] here is my script for this: | view packages| view := MOViewRenderer new title: 'Dependency Browser ', model name. packages := model allPackages select: [:pack | (pack name includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside'] ]. view shape label. view node: 'Citezen'. view node: #aaa forIt:[view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; fillColor: Color red. view nodes: (model allPackages select: [:pack | (pack name includesSubString: 'Citezen') ]). view edgesToAll:#staticProviderPackages. view dominanceTreeLayout. ]. view shape label. view node: 'Seaside'. view node: #bbb forIt:[ view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; fillColor: Color lightBlue. view nodes: (model allPackages select: [:pack | (pack name includesSubString: 'Seaside-Core') and: [(pack name includesSubString: 'Citezen') not]]). view edgesToAll:#staticProviderPackages. view dominanceTreeLayout. ]. view edges: packages to:#staticClientPackages. view open. On Wed, Nov 9, 2011 at 4:50 PM, Alexandre Bergel <alexandre.bergel(a)me.com>wrote;wrote:

...

I am working on this script to see dependencies of seaside and citezen... I would to group the nodes according to their names in Mondrian. Is it

possible? Here is my script:

view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; if: [:pack | pack name includesSubString: 'Citezen'] fillColor:

Color red;

if: [:pack | (pack name includesSubString: 'Seaside') and:

[(pack name includesSubString: 'Citezen' ) not]] fillColor: Color lightBlue.

view nodes: (model allPackages select: [:pack | ((pack name

includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside']) or: [pack name includesSubString: 'Pier']]).

view edgesToAll: #staticProviderPackages. view dominanceTreeLayout.. Like in the figure, I would like to group red nodes on the left and

light blue nodes on the right and at the same time keeping dominanceTreeLayout.

<Screen shot 2011-11-09 at 4.08.18 PM.png> thanx. Usman _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev

Tudor Girba

9:27 p.m.

Just define the edges outside of the root nodes. Cheers, Doru On 9 Nov 2011, at 17:46, Usman Bhatti wrote:

...

Thanx Alex.. that helps. now I do not know how to draw edges from the nodes in different groupings (bigger rectangles). I tried various methods but I didn't succeed. <Screen shot 2011-11-09 at 5.45.09 PM.png> here is my script for this: | view packages| view := MOViewRenderer new title: 'Dependency Browser ', model name. packages := model allPackages select: [:pack | (pack name includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside'] ]. view shape label. view node: 'Citezen'. view node: #aaa forIt:[view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; fillColor: Color red. view nodes: (model allPackages select: [:pack | (pack name includesSubString: 'Citezen') ]). view edgesToAll:#staticProviderPackages. view dominanceTreeLayout. ]. view shape label. view node: 'Seaside'. view node: #bbb forIt:[ view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; fillColor: Color lightBlue. view nodes: (model allPackages select: [:pack | (pack name includesSubString: 'Seaside-Core') and: [(pack name includesSubString: 'Citezen') not]]). view edgesToAll:#staticProviderPackages. view dominanceTreeLayout. ]. view edges: packages to:#staticClientPackages. view open. On Wed, Nov 9, 2011 at 4:50 PM, Alexandre Bergel <alexandre.bergel(a)me.com> wrote: Sure. Something like: view node: 'left red node' forIt: [ view nodes: "your red nodes" ... view dominanceTreeLayout ]. view node: 'right blue node' forIt: [ view nodes: "your blue nodes" ... view dominanceTreeLayout ]. Does this answer to your question? Cheers, Alexandre On 9 Nov 2011, at 07:22, Usman Bhatti wrote:

I am working on this script to see dependencies of seaside and citezen... I would to group the nodes according to their names in Mondrian. Is it possible? Here is my script: view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; if: [:pack | pack name includesSubString: 'Citezen'] fillColor: Color red; if: [:pack | (pack name includesSubString: 'Seaside') and: [(pack name includesSubString: 'Citezen' ) not]] fillColor: Color lightBlue. view nodes: (model allPackages select: [:pack | ((pack name includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside']) or: [pack name includesSubString: 'Pier']]). view edgesToAll: #staticProviderPackages. view dominanceTreeLayout.. Like in the figure, I would like to group red nodes on the left and light blue nodes on the right and at the same time keeping dominanceTreeLayout. <Screen shot 2011-11-09 at 4.08.18 PM.png> thanx. Usman _______________________________________________ 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(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

-- www.tudorgirba.com "Quality cannot be an afterthought."

Usman Bhatti

10:21 p.m.

On Wed, Nov 9, 2011 at 9:27 PM, Tudor Girba <tudor(a)tudorgirba.com> wrote:

...

Just define the edges outside of the root nodes.

Ok thanx doru. It worked. But if I draw my edges outside of the root nodes, I lose the dominanceTreeLayout of the nodes inside the root nodes. How can I force the inner nodes to arrange themselves in the dominanceTreeLayout after I have drawn the edges. because if i do it in the outside block, it is only applicable to the root nodes.

...

Cheers, Doru On 9 Nov 2011, at 17:46, Usman Bhatti wrote:

Thanx Alex.. that helps. now I do not know how to draw edges from the nodes in different

groupings (bigger rectangles). I tried various methods but I didn't succeed.

<Screen shot 2011-11-09 at 5.45.09 PM.png> here is my script for this: | view packages| view := MOViewRenderer new title: 'Dependency Browser ', model

name.

packages := model allPackages select: [:pack | (pack name

includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside'] ].

view shape label. view node: 'Citezen'. view node: #aaa forIt:[view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; fillColor: Color red. view nodes: (model allPackages select: [:pack | (pack name

includesSubString: 'Citezen') ]).

view edgesToAll:#staticProviderPackages. view dominanceTreeLayout. ]. view shape label. view node: 'Seaside'. view node: #bbb forIt:[ view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; fillColor: Color lightBlue. view nodes: (model allPackages select: [:pack | (pack name

includesSubString: 'Seaside-Core') and: [(pack name includesSubString: 'Citezen') not]]).

view edgesToAll:#staticProviderPackages. view dominanceTreeLayout. ]. view edges: packages to:#staticClientPackages. view open. On Wed, Nov 9, 2011 at 4:50 PM, Alexandre Bergel <

alexandre.bergel(a)me.com> wrote:

citezen...

> > I would to group the nodes according to their names in Mondrian. Is it

possible? Here is my script:

> view shape rectangle > width: [:pack | pack numberOfProviderPackages + 3 *3]; > height: [:pack | pack numberOfClientPackages + 6 * 3]; > if: [:pack | pack name includesSubString: 'Citezen']

fillColor: Color red;

> if: [:pack | (pack name includesSubString: 'Seaside') and:

[(pack name includesSubString: 'Citezen' ) not]] fillColor: Color lightBlue.

> view nodes: (model allPackages select: [:pack | ((pack name

includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside']) or: [pack name includesSubString: 'Pier']]).

> view edgesToAll: #staticProviderPackages. > view dominanceTreeLayout.. > > > Like in the figure, I would like to group red nodes on the left and

light blue nodes on the right and at the same time keeping dominanceTreeLayout.

Alexandre Bergel

11 Nov 11 Nov

6:36 a.m.

...

In that case, what could be simple is to explicitly separate the edges you want to use for your layout and the one you add outside the inner nodes. Alexandre

...

Cheers, Doru On 9 Nov 2011, at 17:46, Usman Bhatti wrote:

I am working on this script to see dependencies of seaside and citezen... I would to group the nodes according to their names in Mondrian. Is it possible? Here is my script: view shape rectangle width: [:pack | pack numberOfProviderPackages + 3 *3]; height: [:pack | pack numberOfClientPackages + 6 * 3]; if: [:pack | pack name includesSubString: 'Citezen'] fillColor: Color red; if: [:pack | (pack name includesSubString: 'Seaside') and: [(pack name includesSubString: 'Citezen' ) not]] fillColor: Color lightBlue. view nodes: (model allPackages select: [:pack | ((pack name includesSubString: 'Citezen') or: [pack name includesSubString: 'Seaside']) or: [pack name includesSubString: 'Pier']]). view edgesToAll: #staticProviderPackages. view dominanceTreeLayout.. Like in the figure, I would like to group red nodes on the left and light blue nodes on the right and at the same time keeping dominanceTreeLayout. <Screen shot 2011-11-09 at 4.08.18 PM.png> thanx. Usman _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev

-- www.tudorgirba.com "Quality cannot be an afterthought." _______________________________________________ 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

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

4790

days inactive

4792

days old

moose-dev@list.inf.unibe.ch

Manage subscription

5 comments

3 participants

tags (0)

participants (3)

Alexandre Bergel
Tudor Girba
Usman Bhatti