Nothing
ml.pois100 <-
maxLik2(loglik.pois, start = c(lambda = 1), x.bar = 1.4, n = 100)
plot(ml.pois100) %>% gf_labs(title = "n = 100")
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.