问题描述
下午好，我在制作随机递增序列的递归表时遇到了问题。我希望它返回一个递增的序列，其中两个元素之间存在随机差异。现在我有：
RecurrenceTable[{a[k+1]==a[k] + RandomInteger[{0,4}],a[1]==-12},a,{k,1,5}]
但它返回给我一个等差数列，为所有 k 选择了 d（例如 {-12,-8,-4,4,8,12,16,20,24}） .
此外，如果我将代码中的每个 k 替换为 n，我将非常感谢解释为什么我得到：
RecurrenceTable[{4+a[n] == a[n],a[1] == -12},{n,10}]
非常感谢您的时间！
解决方法
我认为 RecurrenceTable 不是您要找的。p>
试试这个
FoldList[Plus,-12,RandomInteger[{0,4},5]]
这次返回，
{-12,-8,-7,-3,1,2}
然后返回，这一次，
{-12,-9,-5,1}