|
|
A167718
|
|
Squares that becomes primes when prefixed with a 3.
|
|
1
|
|
|
1, 49, 121, 169, 361, 529, 1849, 2401, 3721, 6241, 8281, 9409, 11881, 14161, 14641, 19321, 20449, 25921, 27889, 39601, 49729, 51529, 52441, 69169, 76729, 83521, 89401, 94249, 104329, 113569, 124609, 143641, 165649, 175561, 187489, 190969
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1, 4000, 2]^2, PrimeQ[FromDigits[Join[{3}, IntegerDigits[#]]]] &] (* G. C. Greubel, Jun 21 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|