想用mathematica表示一个数列,数列前32项都是1,从第33项(A33)开始,A33=(A1+A2)mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是感激不尽!

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/30 00:09:06
想用mathematica表示一个数列,数列前32项都是1,从第33项(A33)开始,A33=(A1+A2)mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是

想用mathematica表示一个数列,数列前32项都是1,从第33项(A33)开始,A33=(A1+A2)mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是感激不尽!
想用mathematica表示一个数列,数列前32项都是1,从第33项(A33)开始,A33=(A1+A2)mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是感激不尽!

想用mathematica表示一个数列,数列前32项都是1,从第33项(A33)开始,A33=(A1+A2)mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是感激不尽!
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}]]

查了下函数定义,没看懂——我查到的那个式子是从A32开始往前加的啊,而且里面含了k,那个k是哪里来的?所以,给你指个路吧。
取模是Mod,用递推方程求数列的项可以用RecurrenceTable,具体格式看看帮助吧。