|
|
A167727
|
|
Cubes that becomes a prime number when prefixed with a 3.
|
|
1
|
|
|
1, 343, 4913, 226981, 389017, 456533, 571787, 912673, 1295029, 2352637, 5177717, 5735339, 7645373, 9129329, 10218313, 11089567, 19902511
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
a441 = Select[Range[1, 5000, 2]^3, PrimeQ[FromDigits[Join[{3}, IntegerDigits[#]]]] &] (* G. C. Greubel, Jun 21 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|