KL.default <-
function( params, # parameters over which to calculate
theta, # value of theta
delta = .1 ) # the indifference region specification
{
return( KL.brm( params, theta, delta ) )
} # END KL.default FUNCTION
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.