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 A204662 #26 Nov 12 2019 11:35:07 %S A204662 3,4,6,8,10,12,14,16,18,22,28,30,42,48,58,68,80,86,92,108,110,112,130, %T A204662 198,220,230,322,432,460,478,686,706,714,842,950,1010,1090,1314,1904, %U A204662 2264,2804,3164,3324,4740,4824,4918,5086,5442,6994,7898,8236,8684,10088,13990,15320,17570,18218,21564,22198,22684,24314,24780,25790,38726 %N A204662 Numbers n such that n!8-1 is prime. %C A204662 n!8 = A114800(n). %C A204662 No other terms < 50000. - _Robert Price_, Aug 15 2012 %H A204662 Ken Davis, <a href="http://mfprimes.free-dc.org">Status of Search for Multifactorial Primes</a>. %H A204662 Ken Davis, <a href="http://mfprimes.free-dc.org/mfdata/f08m.html">Results for n!8-1.</a> %t A204662 MultiFactorial[n_, k_] := If[n < 1, 1, n*MultiFactorial[n - k, k]]; %t A204662 Select[Range[0, 1000], PrimeQ[MultiFactorial[#, 8] - 1] & ] (* _Robert Price_, Apr 19 2019 *) %o A204662 (PARI) for(n=0,9999,isprime(prod(i=0,(n-2)\8,n-8*i)-1)& print1(n",")) %Y A204662 Cf. A204657, A204658, A204659, A204660, A204661, A204663, A204664, A156165, A156167, A085150, A085148, A085146, A037083, A080778, A002981. %K A204662 nonn,hard %O A204662 1,1 %A A204662 _M. F. Hasler_, Jan 17 2012 %E A204662 a(39)-a(64) from _Robert Price_, Aug 15 2012