如何在R序列美人鱼图中添加横向融合箭头?在下面的示例中:
library(DiagrammeR)
mermaid("
graph TB
A[GE Solution]-->C{1:1}
B[GA Solution]-->C{1:1}
C{1:1}-->D[Stir 10 mins at 500 r/min]
D[Stir 10 mins at 500 r/min]-->E[Homogenisation at 10000 r/min]
")
Run Code Online (Sandbox Code Playgroud)
我怎么能像下面这样生产?
Pau*_*ulo 14
美人鱼的一个可能的解决方案;
graph LR
X --- D[ ]:::empty
Y --- D
D --> E
classDef empty width:0px,height:0px;
Run Code Online (Sandbox Code Playgroud)
我玩过mermaid,我不确定它是否有功能,看起来它本来是一个简单的文档解决方案,而不是具有很大灵活性的解决方案.您可以使用graphViz执行相同的图表:
library(DiagrammeR)
grViz("digraph dot {
node [shape=rectange];
d1 [shape=point,width=0.01,height=0.01];
{'GE Solution', 'GA Solution'}->d1[dir=none];
d1->'Stir 10 mins at 500 r/min';
'Stir 10 mins at 500 r/min'->'Homogenisation at 10000 r/min'}")
Run Code Online (Sandbox Code Playgroud)
编辑以回复评论:使用子图并对不可见的点(d2在此示例中)进行排名,并将您希望与其保持级别的节点进行相同(此处40oC).
grViz("digraph dot {
node [shape=rectange];
d1 [shape=point,width=0.01,height=0.01];
d2 [shape=point, width=0.01, height=0.01];
{'GE Solution', 'GA Solution'}->d1[dir=none];
d1->'Stir 10 mins at 500 r/min';
'Stir 10 mins at 500 r/min'->d2[dir=none];
subgraph {
rank=same;
d2; '40oC';
}
d2->'40oC'[dir=none];
d2->'Homogenisation at 10000 r/min'}")
Run Code Online (Sandbox Code Playgroud)