pdf("sample.pdf") par(oma=c(2,2,2,2)) plot(1:10) pdf.link.box(1, 5, 3, 8, url="http://www.r-project.org") for(i in 1:10) pdf.text.box(i-0.1, i-0.1, i+0.1, i+0.1, LETTERS[i], border=c(0,0,0)) text(5, 9, "mouse over points!", col=2) text(5, 2, "text test") pdf.link.text("http://www.google.com") mtext("mtext test 1", cex=2) pdf.link.text("http://www.apple.com") mtext("mtext test 2", side = 2, line=2) pdf.link.text("http://www.vmware.com") mtext("mtext test 3", outer=T, side = 1) pdf.link.text("http://www.playstation.com") mtext("mtext test 4", outer=T, side = 4, cex=3) pdf.link.text("http://www.bioconductor.org") dev.off()