Skip to main content
1 of 4
kglr
  • 400.5k
  • 18
  • 488
  • 929
array0 = {{72, 32, 64}, {18, 8, 16}, {63, 28, 56}}; 
array1 = SparseArray[Band[{# - 1 + Length@array0[[#]], #}, Automatic, {-1, 1}] -> 
 array0[[#]] & /@ {1, 2, 3}, {5, 5}]; 
array1 // MatrixForm

enter image description here

kglr
  • 400.5k
  • 18
  • 488
  • 929