想用mathematica表示一个数列,数列前32项都是1,从第33项（A33）开始,A33=（A1+A2）mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是感激不尽!
问题描述：
想用mathematica表示一个数列,数列前32项都是1,从第33项（A33）开始,A33=（A1+A2）mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是感激不尽!
答
查了下函数定义，没看懂——我查到的那个式子是从A32开始往前加的啊，而且里面含了k，那个k是哪里来的？所以，给你指个路吧。
取模是Mod，用递推方程求数列的项可以用RecurrenceTable，具体格式看看帮助吧。
答
RecurrenceTable[{a[n + 32] == Mod[(a[n] + a[n + 1]),2],Table[a[i] == 1,{i,32}]},a,{n,1,10000}]ListLinePlot[RecurrenceTable[{a[n + 32] == Mod[(a[n] + a[n + 1]),2],Table[a[i] == 1,{i,32}]},a,{n,1,10000}...