This function help users to easily make a lower triangular matrix using a symmetric matrix.

make_lower_tri(x, diag = NA)

Arguments

x

A symmetric matrix

diag

What show in the diagonal of the matrix. Default to NA.

Value

A lower triangular matrix

Examples

# \donttest{ library(metan) m <- cor(data_ge2[,5:10]) make_upper_tri(m)
#> EH EP EL ED CL CD #> EH NA 0.869546 0.3626537 0.6302561 0.3971935 0.2805118 #> EP NA NA 0.2634237 0.4580196 0.3908239 0.1750448 #> EL NA NA NA 0.3851451 0.2554068 0.9118653 #> ED NA NA NA NA 0.6974629 0.3897128 #> CL NA NA NA NA NA 0.3003636 #> CD NA NA NA NA NA NA
# }