Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2001
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2001

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

Search the Archive

Re: Making rectangular matrix

  • To: mathgroup at smc.vnet.net
  • Subject: [mg27152] Re: [mg27141] Making rectangular matrix
  • From: BobHanlon at aol.com
  • Date: Thu, 8 Feb 2001 04:40:41 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

rs = 2; cs = 3; rl = 5; cl = 4;

small = Array[a, {rs, cs}];

large = Array[b, {rl, cl}];

{pr, pc} = {Random[Integer, {1, rl-rs+1}], Random[Integer, {1, cl-cs+1}]}

{2, 1}

ReplacePart[large, small, 
  Flatten[Table[{pr+i-1, pc+j-1}, {i, rs}, {j, cs}], 1], 
  Flatten[Table[{i, j}, {i, rs}, {j, cs}], 1]]

{{b[1, 1], b[1, 2], b[1, 3], b[1, 4]}, {a[1, 1], a[1, 2], a[1, 3], 
   b[2, 4]}, {a[2, 1], a[2, 2], a[2, 3], b[3, 4]}, 
  {b[4, 1], b[4, 2], b[4, 3], b[4, 4]}, {b[5, 1], b[5, 2], b[5, 3], 
   b[5, 4]}}


Bob Hanlon

In a message dated 2001/2/7 2:16:40 AM, jeevan4 at hotmail.com writes:

>How  can I make a square or rectangle matrix(2-D) that can be placed 
>at random locations of a bigger 2-D matrix.Thank you.
>


  • Prev by Date: Re: Genetic Algorithms?
  • Next by Date: memory management and pointers
  • Previous by thread: Re: Making rectangular matrix
  • Next by thread: Re: Making rectangular matrix