随机递增序列 - Wolfram Mathematica

Randomly increasing sequence- Wolfram Mathematica

提问人:Aleksandra 提问时间:12/26/2020 最后编辑:Aleksandra 更新时间:12/27/2020 访问量:123

问:

下午好,我在制作随机增加序列的递归表时遇到了问题。我希望它返回一个递增序列,两个元素之间有随机差异。现在我有:

RecurrenceTable[{a[k+1]==a[k] + RandomInteger[{0,4}], a[1]==-12},a,{k,1,5}]

但它返回一个算术级数,其中所有 k 都选择了 d(例如 {-12,-8,-4,0,4,8,12,16,20,24})。

另外,我将非常感谢您解释为什么如果我将代码中的每个 k 替换为 n,我会得到:

RecurrenceTable[{4+a[n] == a[n],a[1] == -12},a,{n,1,10}]

非常感谢您抽出宝贵时间接受采访!

序列 Wolfram-Mathematica 递归

评论


答:

2赞 Bill 12/27/2020 #1

我不相信这就是你要找的。RecurrenceTable

试试这个

FoldList[Plus,-12,RandomInteger[{0,4},5]]

这一次,它回来了,

{-12,-8,-7,-3,1,2}

并返回,这一次,

{-12,-9,-5,-3,0,1}