test_unconstrained(rsymm_norm(15, diag(c(3,2,1))), evals = c(3, 2, 1), B = 100)
test_unconstrained(list(rsymm_norm(15, diag(c(3,2,1))),
rsymm_norm(15, diag(c(3,2,1)))), B = 100)
Run the code above in your browser using DataLab