x = estimate(1, 0.1)
get_est(x)
get_moe(x)
x = estimate(1, 0.1)
if (requireNamespace("posterior", quietly=TRUE)) {
rv_x = to_rvar(x)
(rv_x^2 / rv_x) - rv_x # std. errors zero (correct)
x^2 / x - x # std. errors not zero
}
Run the code above in your browser using DataLab