Fixed an issue where rtheta returned non-symmetric matrices. Simplified is.theta.