Nothing
# Should write a NEW KL function to do integration between theta - delta and theta + delta?
KL <-
function( params, # parameters over which to calculate
theta, # value of theta
delta = .1 ) # the indifference region specification
{
UseMethod( "KL" )
} # END KL FUNCTION
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.