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

MathGroup Archive 2011

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

Search the Archive

Re: Quick Mathematica Question

  • To: mathgroup at smc.vnet.net
  • Subject: [mg115271] Re: Quick Mathematica Question
  • From: "Sjoerd C. de Vries" <sjoerd.c.devries at gmail.com>
  • Date: Thu, 6 Jan 2011 02:03:24 -0500 (EST)
  • References: <ig1i6l$6jj$1@smc.vnet.net>

rules = {"0" -> "1", "1" -> "10"};
NestList[StringReplace[#, rules] &, "0", 5 - 1]

Cheers,

Sjoerd

On Jan 5, 11:46 am, Dean <deanrosent... at gmail.com> wrote:
> How would I program user-defined rules such as
>
> 0->1
> 1->10
>
> to give the output, and specify the number of recursions.  For example,
> starting with 0,
>
> 0
> 1
> 10
> 101
> 10110
> ...
>
> Specified, 5 generations.
>
> --
> Dean Rosenthal
>
> cell: 646 733 6966www.deanrosenthal.orghttp://www.the-open-space.org/webm=
ag/test1.html



  • Prev by Date: Re: Quick Mathematica Question
  • Next by Date: Re: Mathematica 8 & reports / books
  • Previous by thread: Re: Quick Mathematica Question
  • Next by thread: Re: Quick Mathematica Question