Re: Question about ArrayFlatten
- To: mathgroup at smc.vnet.net
- Subject: [mg112212] Re: Question about ArrayFlatten
- From: Adriano Pascoletti <adriano.pascoletti at uniud.it>
- Date: Sun, 5 Sep 2010 05:26:23 -0400 (EDT)
In[59]:= genindex = Range[2];
m1 = ConstantArray[0, {2*Length[genindex], 2*Length[genindex]}];
m2 = ConstantArray[0, {Length[genindex], 2*Length[genindex]}];
m3 = ConstantArray[0, {Length[genindex], Length[genindex]}];
m4 = IdentityMatrix[Length[genindex]];
Au1 = ArrayFlatten[{{m1}, {m2}, {ArrayFlatten[{{m3, m4}}]}}]
Out[64]= {{0, 0, 0, 0}, {0, 0, 0, 0}, {0, 0, 0, 0}, {0, 0, 0, 0}, {0, 0, 0,
0},
{0, 0, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}}
Adriano Pascoletti
2010/9/4 lightnation <lightnation at naver.com>
> The coding below is not working. I don't know what is wrong.
> Please give me some advice.
>
> m1 = ConstantArray[0, {2 Length[genindex], 2 Length[genindex]}];
> m2 = ConstantArray[0, {Length[genindex], 2 Length[genindex]}];
> m3 = ConstantArray[0, {Length[genindex], Length[genindex]}];
> m4 = IdentityMatrix[Length[genindex]];
>
> Au1 = ArrayFlatten[{{m1}, {m2}, {m3, m4}}];
>
>
>
> Thank you.
>
>