Nothing
`YRsecdifL` <-
function(T1, T2)
{
# T1 and T2 are lists
kt = YRsecdif(T1$jd, T1$hr, T1$mi, T1$sec, T2$jd, T2$hr, T2$mi, T2$sec, T1$yr, T2$yr)
return(kt)
}
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.