6

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ファイルを見るときに、次の機能を組み込みたいと思います。各プロットのタイトルをクリックするときにリンク(データベースなど)が必要です。これはどういうわけか可能ですか?

どうも

4

1 に答える 1

5

これはあなたの質問に完全に答えるわけではありませんが、あなたや他の誰かが完全な答えを始めるようになるかもしれません。

Paul MurrelのgridSVGパッケージこの便利なpdfドキュメントも参照)を使用すると、グリッドベースのSVGグラフィックにハイパーリンクを追加できます。(理論的には、ggplot2で動作するはずです。実際には、latticeで動作するようになりました)。R Journalの最新号には、いくつかの記事(「名前の由来」「グリッドグラフィックのデバッグ」 -警告:pdf)が含まれており、対象となるgrobの名前の動的検索を最適に設計するのに役立ちます。リンクを追加したい(コードの2行目のように)。

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")
于 2012-12-21T18:05:01.100 に答える