MathGroup Archive 2007

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

Search the Archive

Re: simple sequence problem


Clear[x];

x[0]=1;
x[n_Integer?Positive]:=x[n]=Cos[x[n-1]];

ListPlot[Table[{n,
    x[n]},{n,0,20}],PlotJoined->True,PlotRange->All,PlotStyle->Red];

??x


Bob Hanlon

---- traz <t_raz at yahoo.com> wrote: 
> Hi, this might be a silly question, but how do you do this in mathematica.
> 
> x1 == Cos[1];
> x2 == Cos[x1];
> x3 == Cos[x2];
> 
> and so on ... ... so basically x(n)= Cos[x(n - 1)]
> 
> I want to plot n against x(n). How do you do the code for this type of sequence in mathematica?
> 



  • Prev by Date: compile speed
  • Next by Date: rescale gray levels with ListDensityPlot
  • Previous by thread: Re: simple sequence problem
  • Next by thread: Re: simple sequence problem