A140132 a(n) = Sum_digits{a(n-1)+a(n-2)+Sum_digits[a(n-1)]+Sum_digits[a(n-2)]}, with a(0)=0 and a(1)=1.

0, 1, 2, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7, 8, 3, 4, 5, 9, 10, 11, 6, 7

Offset

0,3

Comments

After the first three terms the sequence is periodic: 6,7,8,3,4,5,9,10,11.

Links

Table of n, a(n) for n=0..94.

Maple

P:=proc(n) local a, i, t; t:=[0, 1]; for i from 1 to n do
a:=t[-2]+t[-1]+convert(convert(t[-2], base, 10), `+`)+convert(convert(t[-1], base, 10), `+`);
t:=[op(t), convert(convert(a, base, 10), `+`)]; od; print(op(t)); end: P(93); # Paolo P. Lava, Jun 25 2024

Crossrefs

Cf. A016052, A047892, A047897, A047898, A047899, A047900, A047902, A047903, A055263, A134268, A135210, A140131.

Sequence in context: A242430 A035569 A176017 * A377341 A186504 A096909

Adjacent sequences: A140129 A140130 A140131 * A140133 A140134 A140135

Keyword

easy,nonn,base

Author

Paolo P. Lava and Giorgio Balzarotti, May 09 2008

Status

approved