DiagrammeR：如何在箭头旁边添加标签？

Question

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

在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。不幸的是，我在文档中找不到任何相关内容。似乎我在函数rel中对create_edge_df参数做错了。

Answer 1

我认为您将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"))