UT2mat(seq(10)) # defaults: diag="x", LT="x"
# [,1] [,2] [,3] [,4]
# [1,] 1 2 4 7
# [2,] 2 3 5 8
# [3,] 4 5 6 9
# [4,] 7 8 9 10
UT2mat(seq(3), LT=8)
# [,1] [,2]
# [1,] 1 2
# [2,] 8 3
UT2mat(seq(6), diag=0, LT=seq(7,12))
# [,1] [,2] [,3] [,4]
# [1,] 0 1 2 4
# [2,] 7 0 3 5
# [3,] 8 10 0 6
# [4,] 9 11 12 0
UT2mat(rep(-1, 3), diag=c(4,5,6), LT=0)
# [,1] [,2] [,3]
# [1,] 4 -1 -1
# [2,] 0 5 -1
# [3,] 0 0 6
Run the code above in your browser using DataLab