A288879 Primes of the form k!3 + 3^3, where k!3 is the triple factorial number (A007661).
29, 31, 37, 107, 307, 907, 12347, 4188827, 96342427, 2324549427227, 17961239296027, 52580450364682240027, 262134882788466688027, 142299187144047333874073600027, 1414585397090614713326770033423904956109645017737276725445918510284800000000027
Offset: 1
Keywords
Links
- Robert Price, Table of n, a(n) for n = 1..19
- Henri and Renaud Lifchitz, PRP Records.Search for n!3+3^3.
- Joe McLean, Interesting Sources of Probable Primes.
- OpenPFGW Project, Primality Tester.
Programs
-
Mathematica
MultiFactorial[n_, k_] := If[n<1, 1, n*MultiFactorial[n-k, k]]; Select[Table[MultiFactorial[i, 3] + 3^3, {i, 0, 100}], PrimeQ[#]&]