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 A181577 #13 May 03 2024 04:18:26 %S A181577 2,2,3,3,7,13,19,31,37,41,43,47,47,53,71,89,97,103,107,109,113,113, %T A181577 137,139,149,151,151,157,163,181,191,197,211,227,233,239,251,257,263, %U A181577 263,269,271,277,293,313,347,353,359,383,389,401,421,421,433,443,463,499 %N A181577 Prime number of trailing end 0's associated with p! where p = A181576(n). %H A181577 Amiram Eldar, <a href="/A181577/b181577.txt">Table of n, a(n) for n = 1..10000</a> %F A181577 a(n) = A027868(A181576(n)). - _Amiram Eldar_, May 03 2024 %t A181577 Select[ IntegerExponent[ #! ] & /@ Prime@ Range@ 310, PrimeQ] (* _Robert G. Wilson v_, Nov 06 2010 *) %o A181577 (PARI) lista(pmax) = {my(tz); forprime(p = 1, pmax, tz = (p - sumdigits(p, 5))/4; if(isprime(tz), print1(tz, ", ")));} \\ _Amiram Eldar_, May 03 2024 %Y A181577 Cf. A027868, A181575, A181576. %K A181577 base,nonn %O A181577 1,1 %A A181577 _Lekraj Beedassy_, Nov 02 2010 %E A181577 More terms from _Robert G. Wilson v_, Nov 06 2010