powered by
risk_theta_fun(theta1, theta2, n_params)
theta1 <- sample(1:10000, size = 100) theta2 <- sample(1:10000, size = 100) n <- 50 risk_theta_fun(theta1, theta2, n)
Run the code above in your browser using DataLab