Nothing
modif_blocvectorClassification <-
function(text)
{
blocvectorClassification<-balises_qgis()[[10]]
modifs=data.frame(c("TEXT"),stringsAsFactors=F)
modifs[1,2]=text
modifs[,2]=as.character(modifs[,2])
qgs=modification(blocvectorClassification,modifs)
return(qgs)
}
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.