6

我目前有 R 版本 3.2.2 和DiagrammeRR 包。尝试运行以下代码时出现这两个错误：

library(DiagrammeR)
nodes <- create_nodes(nodes = seq(uniquenodes), 
                      type = "number", 
                      label = uniquenodes)

错误：找不到函数“create_nodes”

edges <- create_edges(from = match(df$col1, uniquenodes), 
                      to = match(df$col2,uniquenodes), 
                      rel = "related")

错误：找不到函数“create_edges”

4

2 回答 2

7

下面的代码应该与DiagrammeR0.9.0 兼容。该图表似乎具有与DiagrammeR 中生成的图表不同的外观，在 R 中创建“错误”图表。0.9.0的我玩的render_graph不多，所以还不确定如何获得早期的外观。

df <- data.frame(col1 = c("Cat", "Dog", "Bird"),
                 col2 = c("Feline", "Canis", "Avis"),
                 stringsAsFactors = FALSE)
uniquenodes <- unique(c(df$col1, df$col2))

uniquenodes

library(DiagrammeR)

nodes <- create_node_df(n=length(uniquenodes), 
                        type="number", 
                        label=uniquenodes)
edges <- create_edge_df(from=match(df$col1, uniquenodes), 
                        to=match(df$col2, uniquenodes), 
                        rel="related")
g <- create_graph(nodes_df=nodes, 
                  edges_df=edges)
render_graph(g)
于 2017-02-07T22:00:24.753 回答
1

我在 0.9.0 中还没有玩过 render_graph，所以还不确定如何获得早期的外观。

不同的外观来自attr_themefunction 中的参数，该参数create_graph设置为“default”。将其设置为 NULL 可以恢复外观，但是，这可以通过使用来进一步调整 function ，对我来说，它只能与此处描述 set_global_graph_attributes的结合使用： https ://stackoverflow.com/a/42676248/6816220magrittr:%>%

于 2017-03-08T16:21:51.270 回答