A102114 Iccanobirt numbers (4 of 15): a(n) = R(a(n-1)) + a(n-2) + a(n-3), where R is the digit reversal function A004086.

0, 0, 1, 1, 2, 4, 7, 13, 42, 44, 99, 185, 724, 711, 1026, 7636, 8104, 12680, 24361, 37126, 99214, 102786, 823541, 347328, 1750070, 1871440, 2539179, 13340862, 31214950, 21821254, 89768624, 95723002, 131622637, 921717757, 985062768

Offset

0,5

Comments

Digit reversal variation of tribonacci numbers A000073.

Inspired by Iccanobif numbers: A001129, A014258-A014260.

Links

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

Formula

A004086(a(n)) = A102122(n).

Mathematica

R[n_]:=FromDigits[Reverse[IntegerDigits[n]]]; Clear[a]; a[0]=0; a[1]=0; a[2]=1; a [n_]:=a[n]=R[a[n-1]]+a[n-2]+a[n-3]; Table[a[n], {n, 0, 40}]
nxt[{a_, b_, c_}]:={b, c, FromDigits[Reverse[IntegerDigits[c]]]+b+a}; Transpose[NestList[nxt, {0, 0, 1}, 40]][[1]]  (* Harvey P. Dale, May 30 2012 *)

Crossrefs

Cf. A102111-A102125.

Sequence in context: A103480 A024826 A291481 * A102115 A102116 A102117

Adjacent sequences: A102111 A102112 A102113 * A102115 A102116 A102117

Keyword

nonn,base,easy

Author

Jonathan Vos Post and Ray Chandler, Dec 30 2004

Status

approved