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 A139199 #13 Sep 25 2016 12:33:49 %S A139199 4,5,6,7,8,10,15,18,23,157,165,183,184,362,611,908,2940,6875,9446, %T A139199 16041 %N A139199 Numbers k such that (k!-4)/4 is prime. %C A139199 Numbers k such that (k!-m)/m is prime: %C A139199 for m=1 see A002982 %C A139199 for m=2 prime or pseudoprime see A082671 %C A139199 for m=3 see A139056 %C A139199 for m=4 see A139199 %C A139199 for m=5 see A139200 %C A139199 for m=6 see A139201 %C A139199 for m=7 see A139202 %C A139199 for m=8 see A139203 %C A139199 for m=9 see A139204 %C A139199 for m=10 see A139205 %C A139199 a(17) > 2000 - _Ray G. Opao_, Sep 30 2008 %C A139199 a(21) > 25000 - _Robert Price_, Sep 25 2016 %t A139199 a = {}; Do[If[PrimeQ[(n! - 4)/4], Print[a]; AppendTo[a, n]], {n, 1, 184}]; a (*Artur Jasinski*) %o A139199 (PARI) is(n)=n>3 && isprime(n!/4-1) \\ _Charles R Greathouse IV_, Apr 29 2015 %Y A139199 Cf. A139189, A139190, A139191, A139192, A139193, A139194, A139195, A139196, A139197, A139198. %Y A139199 Cf. n!/m-1 is a prime: A002982, A082671, A139056, A139199-A139205; n!/m+1 is a prime: A002981, A082672, A089085, A139061, A139058, A139063, A139065, A151913, A137390, A139071 (1<=m<=10). %K A139199 hard,more,nonn %O A139199 1,1 %A A139199 _Artur Jasinski_, Apr 11 2008 %E A139199 a(15)-a(16) from _Ray G. Opao_, Sep 30 2008 %E A139199 a(17) from _Serge Batalov_, Feb 18 2015 %E A139199 a(18)-a(20) from _Robert Price_, Sep 25 2016