login
A104119
Primes of the form 6^k + 23.
0
29, 59, 239, 1319, 46679, 60466199, 101559956668439, 170581728179578208279, 293242067884135544935936513642647623193965101079, 39503678872633023420521946711466143994775346134750732502780781099164095188067917234199
OFFSET
1,1
MATHEMATICA
a = Delete[Union[Flatten[Table[If [PrimeQ[6^n + 23] == True, 6^n + 23, 0], {n, 1, 1000}]]], 1]
PROG
(Magma) [ a: n in [0..250] | IsPrime(a) where a is 6^n+23 ]; // Vincenzo Librandi, Nov 18 2010
CROSSREFS
Sequence in context: A326897 A139507 A196940 * A356717 A042674 A078948
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Mar 05 2005
EXTENSIONS
Last term corrected by D. S. McNeil and N. J. A. Sloane, Aug 17 2010
STATUS
approved