DiagrammeR:如何在箭头旁边添加标签?

DiagrammeR: How to add labels beside arrows?

我想用 R 中的 DiagrammeR 包创建一个流程图。该图形应如下例所示,但我想在箭头上方添加一些标签。

考虑以下 R 中的可重现示例:

library("DiagrammeR")

# Create a node data frame (ndf)
ndf <- create_node_df(n = 4,
                      shape = c("rectangle"))

# Create an edge data frame (edf)
edf <- create_edge_df(from = c(1, 2, 3, 3),
                      to = c(4, 3, 1, 4),
                      rel = c("a", "b", "c", "d"))

# Create a graph with the ndf and edf
graph <- create_graph(nodes_df = ndf,
                      edges_df = edf)

# Create a PDF file for the graph (`graph.pdf`)
graph %>%
  export_graph(file_name = "graph.pdf",
               title = "Simple Graph")

使用这段代码,我可以创建下图:

我想在图表的 4 个箭头上方添加标签 a、b、c 和 d。不幸的是,我无法在文档中找到任何相关信息。似乎我在函数 create_edge_df.

中对 rel 参数做错了什么

我认为你将 label = my_vector_of_labels 添加到 create_edges 的定义中:

# Create an edge data frame (edf) using diagrammer v 0.9.2
edf <- create_edge_df(from = c(1, 2, 3, 3),
                  to = c(4, 3, 1, 4),
                  rel = c("a", "b", "c", "d"),
                  label = c("a", "b", "c", "d"))