Как вставить ссылку в pdf с помощью R

Я сохраняю график, сгенерированный с помощью R с помощью функции pdf() (см. ниже). Возможно ли добавить интерактивные гиперссылки на этот сюжет? Альтернативы pdf() приветствуются.

pdf(file="plot.pdf",width=20,height=50)
q <- ggplot(df, aes(x=reorder(desc,Value, FUN=median), y=Value))
q + geom_boxplot(aes(fill = factor(role)))+ coord_flip()
dev.off()

где df$desc выглядит следующим образом:

[1] "http://www.jcvi.org/cgi-bin/tigrfams/HmmReportPage.cgi?acc=TIGR02914  #  EpsI_fam: EpsI family protein  # Role: 141"                                        
[2] "http://www.jcvi.org/cgi-bin/tigrfams/HmmReportPage.cgi?acc=TIGR03067  #  Planc_TIGR03067: Planctomycetes uncharacterized domain TIGR03067  # Role: 157"     
[3] "http://www.jcvi.org/cgi-bin/tigrfams/HmmReportPage.cgi?acc=TIGR03021  #  pilP_fam: type IV pilus biogenesis protein PilP  # Role: 91"

В pdf-ссылке ссылка не доступна.

ОТВЕТЫ

Ответ 1

Вы можете сделать это с помощью Rsweave. Rsweave позволяет вам вызвать R из LaTeX.

Итак, пример файла с использованием моих собственных данных:

\documentclass{article}
\usepackage{hyperref}

\begin{document}
\SweaveOpts{concordance=TRUE}


<<echo=FALSE,fig=TRUE>>=
    library(ggplot2)
    q <- ggplot() + geom_point(data=data.frame(x = c(1,2,3,4),y=c(4,3,2,1)), aes(x=x,y=y))
    print(q)
@
\par{
    \url{http://google.com}
}

\end{document}

И вы можете скомпилировать это из Rstudio. Он будет знать, что делать, если файл имеет расширение .rnw. Если вы компилируете из R, вы можете использовать команду Sweave.