Nothing
get_original_term=function(m,n){
lapply(n, function(y){resAA = y$Words; resBB = lapply(resAA, function(x){ resCC = searchabsL(m, include = x); resDD = gregexpr(x, resCC@Abstract[1], ignore.case = TRUE); resEE = attr(resDD[[1]], "match.length"); resFF = substr(resCC@Abstract[1], start = resDD[[1]][1] , stop = resDD[[1]][1] + (resEE[1] - 1)) ; return(resFF)});return(unlist(resBB))})}
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.