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

来源：学生作业帮助网 编辑：作业帮 时间：2024/11/19 04:47:01
想用mathematica表示一个数列,数列前32项都是1,从第33项（A33）开始,A33=（A1+A2）mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是感激不尽!
xR]OP+n'amo{,wM/*6Y.IEt8jLG"H;v-ْ]؜9<6MoNܔ |)M-htrP="j-c7}g4V5)s qKIOܻ?ݳm֯q EF`}"o_dr2{ׇ[!9eoc'lw\&bsSϔV.SʊEYLG"/Eȓ̚ 0I/@*dQ )DKRȤ& .IwYմt#SWe)gtbXpa޾Tl:ͭ&;j=< Py^8.6~hlujM:yw:Xk0:q=d*ր4:3̎=d ܛk>dR4'LO{Mv8uRQ} m@?neC 'Q zXi

想用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，具体格式看看帮助吧。

想用mathematica表示一个数列,数列前32项都是1,从第33项（A33）开始,A33=（A1+A2）mod2,这个数列要有10000个数,这个公式叫Tausworthe,如果哪位知道这个的更是感激不尽! mathematica中 /.表示啥 mathematica 绝对值咋表示 mathematica中 角度怎么表示 用mathematica怎么求数列收敛 怎么用mathematica 求数列极限 一个Mathematica函数定义问题 Mathematica中这个符号表示什么错误? mathematica中如何表示二维数组 mathematica里怎么表示circ函数? 如何用MATHEMATICA求数列的前n项和 Mathematica如何引入数据拟合函数数据已经引入,但是Mathematica不能用这个来拟合么?小弟刚刚学就要用来拟合一个数据,数据是这样的然后我的命令和Mathematica显示是如下,表示我的数据不是retangula Mathematica中怎么表示趋于0的数 mathematica 软件中二项式是怎么表示的 mathematica作图问题：如何画出一个函数和它的垂直渐近线,要求垂直渐近线用虚线表示?以y=1/(x-2)给出程 数列及表示 Mathematica 动画：用Mathematica画一个小球在一正弦曲线上运动 菲波纳切数列通项公式在Mathematica 4 中如何表达?