Re: simple sequence problem

*To*: mathgroup at smc.vnet.net*Subject*: [mg74415] Re: [mg74402] simple sequence problem*From*: luhao <luhaorice at gmail.com>*Date*: Tue, 20 Mar 2007 05:54:47 -0500 (EST)*References*: <200703200310.WAA15536@smc.vnet.net>

x[1]=1; x[n_]:=Block[{},Cos[x[n-1]]; Table[x[k],{k,1,30}]//N; ListPlot[%]; traz 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? > >

**References**:**simple sequence problem***From:*traz <t_raz@yahoo.com>