Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2014

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Building a matrix

  • To: mathgroup at smc.vnet.net
  • Subject: [mg132740] Re: Building a matrix
  • From: Matthias Bode <lvsaba at hotmail.com>
  • Date: Mon, 19 May 2014 20:15:25 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-outx@smc.vnet.net
  • Delivered-to: mathgroup-newsendx@smc.vnet.net
  • References: <20140519060351.582BA6A9A@smc.vnet.net>

Hola,

pedestrian but readily understandable:

m = {0, 0, 0};
n = {1, 2, 3};
Table[Flatten[Insert[{m, m}, n, p]], {p, 1, 3}]

{{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}}

Best regards,

MATTHIAS BODE

> From: brunocam at libero.it
> Subject: Building a matrix
> To: mathgroup at smc.vnet.net
> Date: Mon, 19 May 2014 02:03:51 -0400
>
> 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


  • Prev by Date: Re: Building a matrix
  • Next by Date: Re: Building a matrix
  • Previous by thread: Building a matrix
  • Next by thread: Re: Building a matrix