使用.Rhtml (从.Rhtml到html)：如何在R图中嵌入链接？

Question

我正在使用knit将我的.Rhtml文件转换为.html文件。我调用一个名为Q1的块的输出：

<!--begin.rcode Q1,echo=FALSE,fig.show="all",fig.align="center",warning=FALSE 
end.rcode--> 

块来了，它基本上是2x2布局中的ggplot2图。

library(ggplot2)
myplot = list()
   for (i in 1:4){
          x = 1:100
          y = sample(100,100)
          data = data.frame(x=x,y=y)
          myplot[[i]] = ggplot(data,aes(x=x,y=y))+geom_point()+labs(title="bla")}

do.call(grid.arrange,c(myplot,list(nrow=2,ncol =2)))

现在，在查看生成的html文件时，我希望合并以下功能:当单击每个绘图的标题时，我希望有一个链接(例如，到数据库)。这有没有可能呢？

Thx

Answer 1

这并不能完全回答你的问题，但它可能会让你或其他人得到一个完整的答案。

Paul Murrel的 package (另请参阅this useful pdf doc)允许用户向网格-based SVG图形添加超链接。(从理论上讲，它应该与ggplot2一起工作；实际上，我刚刚让它与晶格一起工作)。current issue of the R Journal包括几篇文章("What's in a name?"和"Debugging grid graphics." --警告: pdfs)，它们可能会帮助您最好地设计动态搜索，以便为要添加链接的grob名称(如我的第二行代码)进行动态搜索。

library(gridSVG)
library(lattice)

xyplot(mpg~wt, data=mtcars, main = "Link to R-project home")
mainGrobName <- grep("main", grid.ls()[[1]], value=TRUE)
grid.hyperlink(mainGrobName, "http://www.r-project.org")
gridToSVG("HyperlinkExample.svg")