我目前有R版本3.2.2与DiagrammeRR包.尝试运行以下代码时出现以下两个错误:
library(DiagrammeR)
nodes <- create_nodes(nodes = seq(uniquenodes),
type = "number",
label = uniquenodes)
Run Code Online (Sandbox Code Playgroud)
错误:找不到函数"create_nodes"
edges <- create_edges(from = match(df$col1, uniquenodes),
to = match(df$col2,uniquenodes),
rel = "related")
Run Code Online (Sandbox Code Playgroud)
错误:找不到函数"create_edges"
下面的代码应该与DiagrammeR0.9.0 兼容.该图形看起来与DiagrammeR中生成的图形在R中创建"错误"图表的外观不同.我没有render_graph在0.9.0中玩过很多,所以我还不确定如何获得早期的外观.
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)
Run Code Online (Sandbox Code Playgroud)