Bojanje grafa u Mathematici
Select messages from
# through # FAQ
[/[Print]\]

Forum@DeGiorgi -> Računala (općenito)

#1: Bojanje grafa u Mathematici Autor/ica: strumpfette PostPostano: 8:49 pon, 20. 10. 2008
    —
Trebala bih obojati bridove grafa, svaki brid različitom bojom i to tako da Mathematica sama odabere te boje (jer ipak se radi o grafu s 500-injak bridova pa naravno da ručno određivanje boja ne bi bilo zabavno Very Happy).

Pokušala sam sama potražiti rješenje problema na netu, no nije mi pošlo za rukom...


Hvala na pomoći

#2:  Autor/ica: goranm PostPostano: 13:11 pon, 20. 10. 2008
    —
U Mathematici v6 možeš npr. ovako:

Definira se graf
Kod:
g = {{1 -> 2, 1}, {1 -> 3, 2}, {2 -> 4, 3}, {2 -> 5, 4}, {3 -> 6, 5}, {3 -> 7, 6}};

koji izgleda ovako:


i lista od 6 boja,
Kod:
boje = {Green, Blue, Black, Cyan, Gray, Yellow};


Sada se funkcijom EdgeRenderingFunction oznakama brida (edge label) pridruži jedna boja. Bridu sa oznakom 1 se pridruži boja boja[[1]], sa oznakom 2 boja[[2]], itd.

To se može napraviti ovako:
Kod:
GraphPlot[g, EdgeRenderingFunction -> ({boje[[#3]], Line[#1]} &)]

i onda to izgleda ovako:


Isto se može i sa grafom od 500tinjak bridova. Svakom bridu se pridruži broj od 1 do 500 i generira se lista od 500 boja pomoću CMYKColor funkcije.



Clipboard02.png
 Description:
 Filesize:  7.6 KB
 Viewed:  78 Time(s)

Clipboard02.png



Clipboard01.png
 Description:
 Filesize:  7.55 KB
 Viewed:  80 Time(s)

Clipboard01.png





Forum@DeGiorgi -> Računala (općenito)


output generated using printer-friendly topic mod. Vremenska zona: GMT + 01:00.

Stranica 1 / 1.

Powered by phpBB © 2001,2002 phpBB Group
Theme created by Vjacheslav Trushkin