create.flowchart <- function()
{
empty.flowchart <- data.frame(label = character(),
title = character(),
display.r = logical(),
display.n = logical(),
r = integer(),
n = integer(),
from = character(),
stringsAsFactors = FALSE)
return(empty.flowchart)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.