cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

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.

This page as a plain text file.
%I A102114 #10 Dec 19 2015 00:28:45
%S A102114 0,0,1,1,2,4,7,13,42,44,99,185,724,711,1026,7636,8104,12680,24361,
%T A102114 37126,99214,102786,823541,347328,1750070,1871440,2539179,13340862,
%U A102114 31214950,21821254,89768624,95723002,131622637,921717757,985062768
%N 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.
%C A102114 Digit reversal variation of tribonacci numbers A000073.
%C A102114 Inspired by Iccanobif numbers: A001129, A014258-A014260.
%F A102114 A004086(a(n)) = A102122(n).
%t A102114 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}]
%t A102114 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 *)
%Y A102114 Cf. A102111-A102125.
%K A102114 nonn,base,easy
%O A102114 0,5
%A A102114 _Jonathan Vos Post_ and _Ray Chandler_, Dec 30 2004