将 ggplot2 与 Julia pluto 笔记本一起使用答案

【问题标题】：Using ggplot2 with Julia pluto notebook将 ggplot2 与 Julia pluto 笔记本一起使用
【发布时间】：2020-10-02 16:57:36
【问题描述】：

我正在使用 Pluto.jl 笔记本。我想使用 ggplot2 R 库来制作一些绘图。

按照this example，如果我在 Julia REPL 中运行以下代码，那么我可以获得 ggplot2 图形输出。

using RCall
@rlibrary ggplot2
using DataFrames
df = DataFrame(v = [3,4,5], w = [5,6,7], x = [1,2,3], y = [4,5,6], z = [1,1,2])
ggplot(df, aes(x=:x,y=:y)) + geom_line()

现在，当我在 pluto.jl 笔记本中使用相同的代码（每行是一个单独的单元格）时，我收到以下错误消息：

有没有办法让 ggplot2 图像出现在 pluto notebook 中？

同样，如果我只是在单元格中输入ggplot()，我会得到同样的错误，但ggplot not defined。

【问题讨论】：

标签： ggplot2 julia

【解决方案1】：

用@libraryPluto.jl 好像找不到R包。

但是冥王星可以处理这种格式：

@rimport ggplot2 as ggplot2

单击“播放”按钮 3 或 4 次后，我设法看到了图片。好消息就这样结束了——Plut-RCall 集成有点不稳定。该图显示在一个似乎挂起的单独窗口中 - 这可能是一个打开问题的故事。

但是，您可以尝试将图像保存到文件中，然后将其可视化：

begin
    ggplot2.ggplot(df, ggplot2.aes(x=:x, y=:y)) +  ggplot2.geom_line()
    ggplot2.ggsave("myplot.png")
    im1 = Images.load("myplot.png")
end

【讨论】：

【解决方案2】：

作为一种解决方法，可以使用

手动覆盖Base.show（参见Pluto.jl/sample/test1.jl）

function Base.show(io::IO, ::MIME"image/png", p::RObject{VecSxp})
    (path, _) = mktemp()
    R"ggsave($path, plot=$p, device = 'png')"
    im = read(path)
    rm(path)
    write(io, im)
end

之后，输出RObject{VecSxp} 类型的单元格将显示PNG 图像：

【讨论】：

小警告：其他方法也是RObject{VecSxp}但不是情节，例如列表。因此，重载 show 会破坏其他对象的显示方式。