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 A079154 #15 Jan 05 2025 23:39:44 %S A079154 3,4,12,30,33,1406 %N A079154 Numbers k such that reverse(A004154(k)) - 1 is prime. %C A079154 The values corresponding to a(1)-a(6) have been certified prime with Primo. a(7) > 15000. - _Giovanni Resta_, Feb 20 2013 %C A079154 a(7) > 40000. - _Michael S. Branicky_, Jan 05 2025 %t A079154 f[n_] := n!/10^Sum[Floor[n/5^k], {k, 1, Log[10, n] + 1}]; Do[ If[ PrimeQ[ FromDigits[ Reverse[ IntegerDigits[ f[n]]]] - 1], Print[n]], {n, 1, 800}] %Y A079154 Cf. A078305, A004154. %K A079154 base,more,nonn %O A079154 1,1 %A A079154 _Jason Earls_ and _Robert G. Wilson v_, Dec 27 2002 %E A079154 a(6) from _Giovanni Resta_, Feb 20 2013