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

0, 0, 1, 1, 2, 4, 7, 13, 42, 44, 117, 779, 1138, 9801, 3204, 22135, 57415, 77633, 144214, 541549, 1123036, 7257201, 3095708, 21636315, 55486847, 104580673, 482935860, 247988412, 1073911003, 3317721397, 9220077878, 15106615327, 89503015162

Offset

0,5

Comments

Digit reversal variation of tribonacci numbers A000073.

Inspired by Iccanobif numbers: A001129, A014258-A014260.

Links

Harvey P. Dale, Table of n, a(n) for n = 0..1000

Formula

A004086(a(n)) = A102123(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]+R[a[n-3]]; Table[a[n], {n, 0, 40}]
nxt[{a_, b_, c_}]:={b, c, Total[FromDigits/@Reverse/@IntegerDigits[ {a, c}]]+b}; Transpose[NestList[nxt, {0, 0, 1}, 35]][[1]] (* Harvey P. Dale, Dec 19 2011 *)

Crossrefs

Cf. A102111-A102125.

Sequence in context: A024826 A291481 A102114 * A102116 A102117 A220124

Adjacent sequences: A102112 A102113 A102114 * A102116 A102117 A102118

Keyword

nonn,base,easy

Author

Jonathan Vos Post and Ray Chandler, Dec 30 2004

Status

approved