# symmetrize

From calibrator v1.2-8
by Robin K S Hankin

##### Symmetrize an upper triangular matrix

Symmetrize an upper triangular matrix by copying the upper triangular elements into the lower triangular places

- Keywords
- array

##### Usage

`symmetrize(a)`

##### Arguments

- a
Upper triangular matrix to be symmetrized

##### Details

Also works for lower triangular matrices

##### Examples

```
# NOT RUN {
jj <- matrix(rnorm(50),10,5)
X <- crossprod(jj,jj) # X has a Wishart distribution (and in
# particular is positive definite)
chol(X)
symmetrize(chol(X))
# }
```

*Documentation reproduced from package calibrator, version 1.2-8, License: GPL-2*

### Community examples

Looks like there are no examples yet.