Nothing
log_prior <-
function(theta){
## Prior independant of the dynamical charaxcteristics
- 1/2*sum((theta - 50)^2/ 10000 + log(100) ) / length(theta)
}
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.