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 A139060 #15 Oct 14 2024 01:36:51 %S A139060 7,31,181,1556755201,12772735542927360001,3877802510832746496000001, %T A139060 65782709233423382541804503040000001, %U A139060 203978820811974433586402817399028973568000000001 %N A139060 Primes of the form (4+k!)/4. %C A139060 For numbers k for which (4+k!)/4 is prime see A139061. %H A139060 Amiram Eldar, <a href="/A139060/b139060.txt">Table of n, a(n) for n = 1..15</a> %F A139060 a(n) = A139151(A139061(n)). - _Amiram Eldar_, Oct 13 2024 %t A139060 a = {}; Do[If[PrimeQ[(n! + 4)/4], AppendTo[a, (n! + 4)/4]], {n, 1, 50}]; a %t A139060 Select[(4+Range[100]!)/4,PrimeQ] (* _Harvey P. Dale_, Oct 05 2016 *) %o A139060 (PARI) for(k=4,1e3,if(ispseudoprime(t=k!/4+1),print1(t", "))) \\ _Charles R Greathouse IV_, Jul 15 2011 %Y A139060 Cf. A007749, A020458, A082672, A089085, A089130, A117141, A139056, A139057, A139058, A139059, A139061, A139062, A139063, A139064, A139065, A139066, A139151. %K A139060 nonn %O A139060 1,1 %A A139060 _Artur Jasinski_, Apr 07 2008