Nothing
GIFTM<-function(qtxt, group1, group2)
{
if(length(group1)!=length(group2))
stop("Different number of words to match.")
cat(qtxt, "{\n", sep="")
for(i in 1:length(group1))
{
cat("=",group1[i], " -> ", group2[i], sep="")
}
cat("}\n\n")
}
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.