【问题标题】:How to export images of diagrammer in R如何在 R 中导出图表绘制者的图像
【发布时间】:2017-03-11 16:29:09
【问题描述】:

我正在尝试创建图表图的图像,但它会创建空白文件。我的数据框:

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()

【问题讨论】:

  • 这些图表主要用于在 html 页面中呈现,而不是保存在图像文件中。但是,该软件包允许使用 ?export_graph 保存它们(尽管我没有测试,因为您似乎需要额外的软件包)。
  • @nicola,您的建议有效。在我看来应该是答案......

标签: r diagrammer


【解决方案1】:

这个解决方案是this thread

library(DiagrammeR)
library(DiagrammeRsvg)
library(magrittr)
library(rsvg)

graph <-
    "graph {
        rankdir=LR; // Left to Right, instead of Top to Bottom
        a -- { b c d };
        b -- { c e };
        c -- { e f };
        d -- { f g };
        e -- h;
        f -- { h i j g };
        g -- k;
        h -- { o l };
        i -- { l m j };
        j -- { m n k };
        k -- { n r };
        l -- { o m };
        m -- { o p n };
        n -- { q r };
        o -- { s p };
        p -- { s t q };
        q -- { t r };
        r -- t;
        s -- z;
        t -- z;
    }
"

grViz(graph) %>%
    export_svg %>% charToRaw %>% rsvg_pdf("graph.pdf")
grViz(graph) %>%
    export_svg %>% charToRaw %>% rsvg_png("graph.png")
grViz(graph) %>%
    export_svg %>% charToRaw %>% rsvg_svg("graph.svg")

【讨论】:

  • 目前还需要附上DiagrammeRsvg包-library(DiagrammeRsvg)
【解决方案2】:

如果您想在不先渲染图像的情况下导出为 svg。

require(magrittr)
require(DiagrammeR)
require(DiagrammeRsvg)
require(xml2)

graphobject %>%
  export_svg() %>%
  read_xml() %>%
  write_xml("graph.svg")

不首先渲染图像的优点是 svg 文件更干净、更小、更清晰。 优化和美化代码可以使用:https://jakearchibald.github.io/svgomg/

【讨论】:

  • 这为我提供了更好的形象
【解决方案3】:

首先安装DiagrammeRsvgrsvg 软件包。在代码末尾添加这些行:

export_graph(graph_name,
file_name = "pic.png",
file_type = "png")

有了它,您不仅可以创建png 图像,还可以创建pdf

【讨论】:

    猜你喜欢
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2013-07-02
    • 2012-12-08
    • 2019-05-20
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    相关资源
    最近更新 更多