Nothing
d123muneglog <-
function(t1, t2, t3, alpha=2 ,... ) eval({t1<-t1; t2<-t2; t3<-t3; alpha<-alpha; .d123muneglog})
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.