小编Dei*_*nis的帖子

我正在尝试创建制图仪图形的图像，但它创建的是空白文件。我的数据框：

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

其余代码：

png("C:\\tmp\\anim.png")
uniquenodes <- unique(c(df$col1, df$col2))
library(DiagrammeR)
nodes <- create_node_df(n=length(uniquenodes), nodes = seq(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)
dev.off()

我目前有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"

我想从数据框中创建直方图，但是每次使用代码时都会出错'x' must be numeric。

    df <- data.frame(col1 = c(10, 20, 30, 40, 50, 60, 70, 80, 90, 100, 110, 120),
    col2 = c(10, 21, 31, 41, 51, 61, 72, 82, 92, 104, 114, 134))

    hist(df)