OFFSET
0,3
COMMENTS
Same formula, seed {0,1} : 0, 1, 1, 2, 3, 4, 6, 9, 15, 15, 19, 22, 31, 46, 48, 49, 49, 98, 144, 146, 149, 298, 396, 792, 823, 921, 1019, 1021, 1043, 1049, 1841, 2860
Same formula, seed {1,2} : 1, 2, 4, 8, 9, 17, 25, 33, 35, 60, 77, 94, 111, 119, 238, 476, 714, 715, 826, 937, 962, 1081, 1795, 1796, 2733, 3814, 3822, 3855, 4093, 7948
LINKS
Ivan Neretin, Table of n, a(n) for n = 0..10000
FORMULA
a(0)=a(1)=1, for n>=2, a(n) = a(n-1) + a(a(n-2) mod n).
MATHEMATICA
Fold[Append[#1, #1[[-1]] + #1[[1 + Mod[#1[[-2]], #2]]]] &, {1, 1}, Range[2, 49]] (* Ivan Neretin, Sep 07 2017 *)
PROG
(Python)
a = [1]*1000
for n in range(2, 77):
..print(a[n-2], end=', ')
..a[n] = a[n-1] + a[a[n-2] % n]
# Corrected by Derek Orr, Sep 25 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Alex Ratushnyak, Aug 14 2012
STATUS
approved