MathGroup Archive 2002

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

Search the Archive

Re: Plot Random Walk!

  • To: mathgroup at smc.vnet.net
  • Subject: [mg34402] Re: Plot Random Walk!
  • From: digrpat at aol.com (Patrick Callahan)
  • Date: Sat, 18 May 2002 03:51:07 -0400 (EDT)
  • References: <ac2nmv$3s4$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

RandomWalk[n_]:=NestList[#+(-1)^Random[Integer]&,0,n];


Show[
  Table[
    ListPlot[
      RandomWalk[200],PlotJoined->True,DisplayFunction->Identity],
    {100}
    ],DisplayFunction->$DisplayFunction]


>
>With this procedure i plot a randomwalk
>
>RandomWalk[n_]:=NetList[#+(-1)^Random[Integer ])&,0,n]
>
>ListPlot [RandomWalk[200],PlotJoined-->True]
>
>
>
>How can i plot for example 100 random walk on the same plot??
>
>Thankyou
>
>
>
>
>
>
>




  • Prev by Date: //MatrixForm
  • Next by Date: Re: Plot Random Walk!
  • Previous by thread: Plot Random Walk!
  • Next by thread: Re: Plot Random Walk!