Nothing
add.target2href<-function(tr,split="\">"){
tmp<-strsplit(tr,split)
for(i in 1:length(tmp)){
tmp1<-tmp[[i]]
if(length(tmp1)>1)
tr[i]<-paste(tmp1[1],paste("\" target=\"_blank\">",tmp1[-1],
sep="",collapse=""),sep="")
}
tr
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.