Nothing
enlarge_matrix <-
function (f, d)
{
fenl = matrix(0, nrow(f) + 2 * d, ncol(f) + 2 * d, byrow = FALSE)
fenl[(1 + d):(nrow(f) + d), (1 + d):(ncol(f) + d)] = f
return(fenl)
}
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.