Nothing
hide_cells <- function(board) {
m <- attr(board, "hide")
if(!any(m)) return(board)
update_smiley(":)")
board <- update_cells(board, "-", m)
attr(board, "hide")[] <- FALSE
board
}
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.