R/risk_theta_fun.R

In pauwels2014: Bayesian Experimental Design for Systems Biology.

Defines functions risk_theta_fun

Documented in risk_theta_fun

risk_theta_fun <-
function(theta1, theta2, n_params){
	## Risk function
	1 / n_params * sum(log(theta1/theta2)^2)
}

Try the pauwels2014 package in your browser