Re: Building a matrix

[Alexei Boulbitch]

Given:

m = [0,0,0}
n = {1,2,3}

how can I get a function to give:

{{1,2,3,0,0,0,0,0,0}, {0,0,0,1,2,3,0,0,0}, {0,0,0,0,0,0,1,2,3}}

???

Bruno

Hi, Bruno,

You might do like the following, for example:

Map[Flatten, Table[RotateRight[{n, m, m}, i], {i, 0, 2}]]

Returning
{{1, 2, 3, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 2, 3, 0, 0, 0}, {0, 0, 0,
0, 0, 0, 1, 2, 3}}
As you want, or a bit shorter:

Flatten /@ (RotateRight[{n, m, m}, #] & /@ {0, 1, 2})

Returning the same.

Have fun, Alexei

Alexei BOULBITCH, Dr., habil.
IEE S.A.
ZAE Weiergewan,
11, rue Edmond Reuter,
L-5326 Contern, LUXEMBOURG

Office phone : +352-2454-2566
Office fax: +352-2454-3566
mobile phone: +49 151 52 40 66 44

e-mail: alexei.b...@iee.lu