A283474 a(0) = 0, a(1) = 1, for n > 1, a(n) = a(n-1) + a(n-A002487(n)).

0, 1, 2, 3, 6, 8, 14, 20, 40, 48, 68, 82, 150, 190, 272, 354, 708, 858, 1130, 1280, 2138, 2328, 3186, 3894, 7080, 8210, 10538, 11818, 20028, 23214, 33752, 44290, 88580, 100398, 123612, 134150, 222730, 233268, 277558, 300772, 534040, 567792, 691404, 725156, 1025928, 1126326, 1427098, 1704656, 3131754, 3665794

Offset

0,3

Links

Antti Karttunen, Table of n, a(n) for n = 0..1024

Formula

a(0) = 0, a(1) = 1, for n > 1, a(n) = a(n-1) + a(A284013(n)).

Prog

(Scheme) ;; With memoization-macro definec.
(definec (A283474 n) (if (<= n 1) n (+ (A283474 (- n 1)) (A283474 (- n (A002487 n))))))

Crossrefs

Cf. A000045, A002487, A078510, A284007, A284013.

Cf. A283479 (first differences).

Sequence in context: A106182 A360621 A097097 * A206370 A297416 A304484

Adjacent sequences: A283471 A283472 A283473 * A283475 A283476 A283477

Keyword

nonn

Author

Antti Karttunen, Mar 23 2017

Status

approved