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.
%I A102118 #17 Dec 18 2020 18:16:05 %S A102118 0,0,1,1,2,4,7,31,24,26,18,86,31,531,846,8041,8149,63071,16297,71578, %T A102118 649051,629637,6620531,9129987,55108361,97885807,551421261,924514407, %U A102118 5741283751,9149127127,58252941851,92725334137,511304721061 %N A102118 Iccanobirt numbers (8 of 15): a(n) = R(a(n-1) + a(n-2) + a(n-3)), where R is the digit reversal function A004086. %C A102118 Digit reversal variation of tribonacci numbers A000073. %C A102118 Inspired by Iccanobif numbers: A001129, A014258-A014260. %H A102118 Harvey P. Dale, <a href="/A102118/b102118.txt">Table of n, a(n) for n = 0..1000</a> %t A102118 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 A102118 Transpose[NestList[{#[[2]],#[[3]],FromDigits[Reverse[IntegerDigits[Total[ #]]]]}&,{0,0,1},40]][[1]] (* _Harvey P. Dale_, Dec 04 2012 *) %Y A102118 Cf. A102111, A102112, A102113, A102114, A102115, A102116, A102117, A102119, A102120, A102121, A102122, A102123, A102124, A102125. %K A102118 nonn,base,easy %O A102118 0,5 %A A102118 _Jonathan Vos Post_ and _Ray Chandler_, Dec 30 2004 %E A102118 Incorrect formula removed by _Georg Fischer_, Dec 18 2020