kDAMsleep1 <- function(yy, mm, dd, hours, mins, days)
{
library(flysleep)
days <- 3
DAMFileScan(yy, mm, dd, hours, mins, days)
DAMsleep1()
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.