Re: Quick Mathematica Question
- To: mathgroup at smc.vnet.net
- Subject: [mg115282] Re: Quick Mathematica Question
- From: dr DanW <dmaxwarren at gmail.com>
- Date: Thu, 6 Jan 2011 02:05:30 -0500 (EST)
- References: <ig1i6l$6jj$1@smc.vnet.net>
ReplaceRepeated has a MaxIterations option, or you could do:
Grid[NestList[#1 /. {0 -> 1, 1 -> Sequence[1, 0]} & , {0}, 4]]
Daniel