|
|
A115693
|
|
Powerful(1) numbers (A001694) whose digit reversal is a cube.
|
|
3
|
|
|
1, 8, 72, 100, 343, 800, 1000, 1331, 7200, 8000, 10000, 34300, 72000, 80000, 100000, 133100, 343000, 720000, 800000, 1000000, 1030301, 1331000, 1367631, 3430000, 7200000, 8000000, 10000000, 13310000, 34300000, 72000000, 80000000, 100000000, 103030100, 133100000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
72 = 2^3*3^2 is powerful and 27 = 3^3.
|
|
MATHEMATICA
|
Select[Join[{1}, Select[Range[10000000], Min[Transpose[ FactorInteger[#]] [[2]]]>1&]], IntegerQ[Power[FromDigits[Reverse[IntegerDigits[#]]], (3)^-1]]&] (* Harvey P. Dale, Sep 18 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|