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