

A134618


Numbers such that the sum of cubes of their prime factors (taken with multiplicity) is a prime.


9



12, 28, 40, 45, 48, 52, 54, 56, 63, 75, 80, 96, 104, 108, 117, 136, 152, 153, 165, 175, 210, 224, 232, 245, 250, 261, 268, 300, 320, 325, 333, 344, 350, 363, 384, 387, 390, 399, 405, 416, 432, 462, 464, 468, 475, 477, 504, 507, 531, 536, 539, 561, 570, 584
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Harvey P. Dale and Hieronymus Fischer, Table of n, a(n) for n = 1..10000 (first 1000 terms from Harvey P. Dale)


EXAMPLE

a(2)=28, since 28=2*2*7 and 2^3+2^3+7^3=359 which is prime.


MATHEMATICA

Select[Range[600], PrimeQ[Total[Flatten[Table[#[[1]], {#[[2]]}]&/@ FactorInteger[#]]^3]]&] (* Harvey P. Dale, Feb 01 2013 *)


CROSSREFS

Cf. A001597, A025475, A134333, A134344, A134376.
Cf. A134600, A134602, A134605, A134608, A134612, A134616, A134620.
Sequence in context: A087252 A141274 A224613 * A108405 A184838 A044073
Adjacent sequences: A134615 A134616 A134617 * A134619 A134620 A134621


KEYWORD

nonn


AUTHOR

Hieronymus Fischer, Nov 11 2007


EXTENSIONS

Example clarified by Harvey P. Dale, Feb 01 2013
Minor edits by Hieronymus Fischer, May 06 2013


STATUS

approved



