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 A139065 #54 Nov 20 2016 10:24:05 %S A139065 11,15,16,25,35,59,64,68,82,121,149,238,584,912,3349,4111,4324,15314, %T A139065 19944,20658,22740,23364 %N A139065 Numbers k for which (7+k!)/7 is prime. %C A139065 For primes of the form (7+k!)/7, see A139064. %C A139065 a(23) > 25000. - _Robert Price_, Nov 20 2016 %t A139065 a = {}; Do[If[PrimeQ[(n! + 7)/7], AppendTo[a, n]], {n, 1, 500}]; a %t A139065 Select[Range[500],PrimeQ[(7+#!)/7]&] (* _Harvey P. Dale_, Sep 01 2014 *) %o A139065 (PARI) for(k=7,1e3,if(ispseudoprime(k!/7+1),print1(k", "))) \\ _Charles R Greathouse IV_, Jul 15 2011 %Y A139065 Cf. A082672, A089085, A089130, A117141, A007749, A139056, A139057, A139058, A139059, A139060, A139061, A139061, A139062, A139063, A139064, A139065, A139066, A020458. %Y A139065 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 A139065 nonn,hard,more %O A139065 1,1 %A A139065 _Artur Jasinski_, Apr 07 2008 %E A139065 More terms from _Serge Batalov_, Feb 18 2015 %E A139065 a(18)-a(22) from _Robert Price_, Nov 20 2016