[Dmug] RelationGraph mit Zerfallsketten an der Linie beschriften mit der Zerfallsart

[Peter Klamser via demug <demug@XXXXXXX.ch>]

Vorbemerkung: Im ursprünglichen posting hatte ich ein sehr großes Notebook
übersandt, da das kurze, das ich vorbereitet hatte (siehe Anhang) plötzlich
nicht funktionierte. Jetzt geht es, warum weiß ich auch nicht. Ganz stabil
ist MMA nicht, das hat mir der Support von WRI.com auch bestätigt. Lustig
ist auch Quantity[1, "Meters"] < \[Infinity], aber das ist eine andere
Geschichte...

> Hallo, kann mir bitte jemand weiter helfen?
> Ich will an einem RelationGraph mit einer Zerfallskette die Linie mit der
> Zerfallsart beschriften.
> Es gibt da die Funktion EdgeLabels. Aber da komme ich nicht weiter.
> Das Notebook stammt von:
>
>
> https://www.wolframcloud.com/objects/nbarch/2019/07/2019-07-5kp1y6b/2019-07-5kp1y6b.nb
>
> Dort will ich in dem Ausdruck ein Edgelabel hinzufügen:
>
> makeDecayGraphSample[isotope_] :=
>  RelationGraph[DaughterNuclidesQ, children[isotope],
>   Sequence[VertexLabels -> makeVertexLabels[isotope],
>    PlotRangePadding -> 0.65, ImageSize -> 300,
>    PlotTheme -> "Scientific"(*,
>    EdgeLabels\[Rule]{3\[UndirectedEdge]1->}*)]]
> makeDecayGraphSample[Entity["Isotope", "Pu241"]]
>
> Danke sagt Peter
>

<<attachment: Kurz 20-08-2020.nb>>

_______________________________________________
DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch
http://www.mathematica.ch/mailman/listinfo/demug
Archiv: http://www.mathematica.ch/archiv.html