Nothing
`convert2strings` <-
function(pattmat){
################################################################
# initializes resulting string
# uses p2string
################################################################
strvec<-NULL
for (i in 1:nrow(pattmat))
strvec[i]<-p2string(pattmat[i,])
strvec
}
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.