如何在 Diagrammer, R 中反转箭头（尾巴）？

Question

让我们创建一个非常简单的图表：

niv <- c("A","B","C","D","E")
from <- c("A","A","A","E","B","C","D")
to <-   c("B","C","D","B","C","A","E")
arr <- c(rep("normal",6), "inv")
temp <- data.table(from=factor(from, levels=niv), 
to=factor(to,levels=niv))
nodes <- create_node_df(n=length(niv), label=niv,
width=0.3) 
edges <- create_edge_df(from = temp$from,
to = temp$to, rel = "leading_to", label=temp$from,
arrowhead=arr, penwidth=3, color="blue")   
graph <- create_graph(nodes_df=nodes,edges_df=edges)
render_graph(graph)

图中显示了从一个节点到另一个节点的边。
通常人们用箭头画那个边缘，但我想用相反的符号画一些，尾巴头。

我发现通过使用参数 arrowhead="inv" 我可以将箭头改为尾巴。（在我的示例中，从 D 到 E 的边有一条尾巴）。

但是有个问题，尾巴画反了。我想把它画在边缘的开始处（箭头）。

如何更改？

有一个参数 rel = "leading_to" 但我没能找到它能得到的其他值。
还有一个参数"dir"但是我也不知道怎么用

谢谢。

一个额外的问题是：如何防止 Diagrammer 将标签写在边缘上方？我希望它们不要重叠。

Answer 1

您可以将目录切换到 "back":

library(DiagrammeR)
library(data.table)
niv <- c("A","B","C","D","E")
from <- c("A","A","A","E","B","C","D")
to <-   c("B","C","D","B","C","A","E")
temp <- data.table(from=factor(from, levels=niv), 
                   to=factor(to,levels=niv))
nodes <- create_node_df(n=length(niv), label=niv,
                        width=0.3) 
edges <- create_edge_df(from = temp$from,
                        to = temp$to, dir = "back", label=temp$from,
                        arrowtail="inv", penwidth=3, color="blue")   
graph <- create_graph(nodes_df=nodes,edges_df=edges)
render_graph(graph)

如何在 Diagrammer, R 中反转箭头（尾巴）？

How to reverse arrows (tails) in Diagrammer, R?

r

diagrammer