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 A180628 #23 Jul 07 2024 22:32:47
%S A180628 2,3,4,5,6,7,8,12,23,25,31,57,74,86,140,240,310,703,713,796,1028,1102,
%T A180628 1924,3469,3990
%N A180628 Numbers k such that 7*k! - 1 is prime.
%C A180628 a(26) > 12000. - _Michael S. Branicky_, Jul 07 2024
%H A180628 <a href="/index/Pri#primepop">Index entries for sequences related to numbers of primes of the form k*n!+-1</a>
%t A180628 fQ[n_] := PrimeQ[7 n! - 1]; k = 0; lst = {}; While[k < 1501, If[ fQ@k, AppendTo[lst, k]; Print@k]; k++ ]; lst
%t A180628 Select[Range[4000],PrimeQ[7#!-1]&] (* _Harvey P. Dale_, Apr 22 2024 *)
%o A180628 (PARI) is(k) = ispseudoprime(7*k!-1); \\ _Jinyuan Wang_, Feb 03 2020
%Y A180628 Cf. A002982, A076133, A076134, A099350, A099351, A180627, A180629, A180630, A180631.
%K A180628 nonn,more
%O A180628 1,1
%A A180628 _Robert G. Wilson v_, Sep 13 2010
%E A180628 a(23) from _Jinyuan Wang_, Feb 03 2020
%E A180628 a(24)-a(25) from _Michael S. Branicky_, Apr 25 2023