Re: Dont Understand

*To*: mathgroup at smc.vnet.net*Subject*: [mg15953] Re: Dont Understand*From*: "Seth Chandler" <SChandler at uh.edu>*Date*: Wed, 17 Feb 1999 23:34:13 -0500*Organization*: University of Houston*References*: <7a2bm8$1ts@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

The problem is that you haven't reset s to be s/.{0->-1}. If your function were as follows, I think you would get the behavior you desire: init3[n_Integer]:=Module[{s=Table[Random[Integer,{n n}]},Partition[s/.{0->-1},n]] Seth J. Chandler Associate Professor of Law University of Houston Law Center Don McKenzie Paul wrote in message <7a2bm8$1ts at smc.vnet.net>... > >I'm not an expert in Mathematica and would appreciate comments on why >init1 returns a list with all zeros replaced by -1, but init does not. >Its probably very simple but its confused me. > >Don > >init[n_Integer]:=Module[ > {s=Table[Random[Integer],{n n}]}, > s/.{0->-1}; > Partition[s,n] > ] > >init1[n_Integer]:=Module[ > {s=Table[Random[Integer],{n n}]}, > s/.{0->-1} > ] > > >-- > >Prof. Don McKenzie Paul tel. (1203) 523603 Department of >Physics fax. (1203) 692016 University of Warwick >email phrje at csv.warwick.ac.uk COVENTRY CV4 7AL >UK > >