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 A062551 #20 Apr 19 2025 11:07:08
%S A062551 7,19,73,2161,15121,1088641,10886401,18681062401,
%T A062551 77556050216654929920001,46533630129992957952000001,
%U A062551 789392510801080590501654036480000001
%N A062551 Primes of the form 3*k! + 1.
%H A062551 Harry J. Smith, <a href="/A062551/b062551.txt">Table of n, a(n) for n=1,...,15</a>
%F A062551 a(n) = A173324(A076679(n)). - _Elmo R. Oliveira_, Apr 17 2025
%t A062551 lst={};Do[p=3*n!+1;If[PrimeQ[p],AppendTo[lst,p]],{n,0,5!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Jan 28 2009 *)
%t A062551 Select[3*Range[40]! +1,PrimeQ] (* _Harvey P. Dale_, Jul 20 2018 *)
%o A062551 (PARI) for(n=1,40, if(isprime(3*n!+1),print(3*n!+1)))
%o A062551 (PARI) { n=0; for (m=0, 10^5, if(isprime(a=3*m! + 1), write("b062551.txt", n++, " ", a); if (n==15, break)) ) } \\ _Harry J. Smith_, Aug 08 2009
%Y A062551 Cf. A076679, A173324.
%K A062551 nonn
%O A062551 1,1
%A A062551 _Jason Earls_, Jul 10 2001