Contact: aviboots(AT)netvision.net.il
40,849 questions
53,254 answers
573 users
m = diag(c(7, 9, 2), 3, 3) print(m) # run: # # [,1] [,2] [,3] # [1,] 7 0 0 # [2,] 0 9 0 # [3,] 0 0 2 #
m = diag(c(7, 9, 2, 5)) print(m) # run: # # [,1] [,2] [,3] [,4] # [1,] 7 0 0 0 # [2,] 0 9 0 0 # [3,] 0 0 2 0 # [4,] 0 0 0 5 #