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 A102143 #17 Aug 02 2021 16:47:55 %S A102143 4,6,7,11,55,56,69,87,109,191,314,4579,6281,6400,23256,31648 %N A102143 Iccanobirt prime indices (13 of 15): Indices of prime numbers in A102123. %C A102143 a(17) > 50000. - _Robert Price_, Nov 10 2018 %F A102143 A102123(a(n)) = A102163(n). %t A102143 a[n_] := a[n] = %t A102143 IntegerReverse[IntegerReverse[a[n - 1]] + a[n - 2] + IntegerReverse[a[n - 3]]]; %t A102143 a[0] = 0; a[1] = 0; a[2] = 1; %t A102143 Select[Range[0, 5000], PrimeQ[a[#]] &] (* _Robert Price_, Apr 10 2020 *) %Y A102143 Cf. A000040, A102123, A102131-A102145. %K A102143 nonn,more,base %O A102143 1,1 %A A102143 _Jonathan Vos Post_ and _Ray Chandler_, Dec 31 2004 %E A102143 a(13)-a(16) from _Robert Price_, Nov 10 2018 %E A102143 Offset changed to 1 by _Jinyuan Wang_, Aug 02 2021