Я создал диаграмму (ниже) с пакетом DiagrammR, используя функцию grViz, но не знаю, как сделать несколько букв нижними в «выражениях ребер» в grViz »(например, φI) (Примечание; я знаю, как включитьsub / supscripts в «утверждениях узла», но не с «крайними утверждениями»).Я интенсивно искал в Интернете, некоторые предлагали это (# ₂ = индекс, ² = верхний индекс), но это не помогло.
Любая помощь очень ценится
Вот мои коды:
================================================
rm(list=ls()) install.packages("DiagrammeR") library(DiagrammeR)
-------------------------
создание диаграммы
grViz(" digraph boxes_and_cicles{
node[shape=box fontname=Arial fontsize= 30
penwidth=3.0 island_size = 50 style= filled fillcolor=lightgrey fixedszie=F height=2 width=3]
S[fontsize=50]; LA[fontsize=50, label=<L<SUB>A</SUB>>]; LB[fontsize=50, label=<L<SUB>B</SUB>>]; I[fontsize=50]; Se[fontsize=50, label=<S<SUB>e</SUB>>];
---------------------------------------------------
node[shape=circle fontname= Arial fontsize= 30
penwidth=3.0 island_size = 50 style= filledfillcolor=white fixedszie=F height=1 width=2]
T[fontsize=50]; TL[fontsize=50, label=<T<SUB>L</SUB>>]
--------------------------------------------------
Добавить выражение края
edge [arrowhead=vee
color=black fontname = 'Times New Roman' fontsize=40 width=3 fontcolor=black]
S -> LA[label = ' λ(A) '];
LA ->LB [label = ' κ ']; LA->I [label = ' ε '] ;
LB-> LA [label = ' 1/2 λ(A) ']; LB -> I[label = ' ν']; I ->T [label= ' δ', fontcolor=blue]; I-> Se [label= 'γ ']; T ->Se[label= ' ΦI', fontcolor=blue, style='dotted', penwidth=5]; <## Φ. Я должен быть нижним индексом> Se -> LA [label = ' 1/2 λ(A) ']; LB->TL[label= ' δL', fontcolor=blue]; <## 'δL' должен быть нижним индексом> LA -> TL [label= ' δL'];
TL -> LB [label = ' ωL']; ## 'ωL должен быть нижним индексом T->I [label= ' ω' ]; TL-> Se [label = ' ΦL ', style='dotted', penwidth=5, color=black]; <## 'ΦL' должен быть нижним индексом>
добавить оператор графа
graph[nodesep=1.5]
END
=======================================================