如何将矢量图像合并到绘图对象中？

编程问答 2022-08-15

问题描述

我正在尝试将矢量图像合并到绘图对象中，以使矢量图像位于散点图的背景上。我还没有找到直接将矢量图像导入plotly()的方法，但是我确实弄清楚了如何将矢量图像合并到ggplot对象中，以及如何将ggplot对象转换为可打印对象。这就是我将矢量图像合并到ggplot对象中的方式：

library(grImport)
library(ggplot2)
library(plotly)

PostScriptTrace("shapes.eps","shapes.eps.xml",charpath=TRUE,charpos=FALSE,setflat=NULL,defaultcol="black",encoding="ISO-8859-1",scaleEPS=.01)
tree <- readPicture("shapes.eps.xml")
simpleGrob <- gTree(children=gList(pictureGrob(tree)))

ggplot(mtcars) +
  geom_point(aes(x=disp,y=mpg)) +
  annotation_custom(simpleGrob)

然后我尝试使用ggplotly()将ggplot对象转换为可打印对象：

p <- ggplot(mtcars) +
  geom_point(aes(x=disp,y=mpg)) +
  annotation_custom(simpleGrob)

fig <- ggplotly(p)
fig

但是，这产生了一条消息：' geom_GeomCustomAnn（）尚未以绘图方式实现。 如果您希望看到该几何图形已实现， 请在以下示例代码中打开一个问题 https://github.com/ropensci/plotly/issues'

还有另一种方法可以将矢量图像合并到一个绘图对象中，同时仍将其保持为矢量吗？

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

ggplot2ggplotlyplotlyrrvectorvector