.fit.param.f.unif <- function(counting, kmax) { theta <- kmax return(c(theta, NA)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.