%I A117453
%S A117453 1,16,64,81,256,512,625,729,1024,1296,2401,4096,6561,10000,14641,15625,
%T A117453 16384,19683,20736,28561,32768,38416,46656,50625,59049,65536,83521,
%U A117453 104976,117649,130321,160000,194481,234256,262144,279841,331776,390625
%N A117453 Perfect powers in more than one way.
%H A117453 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
PerfectPower.html">Perfect Power</a>
%e A117453 16 = 2^4 = 4^2
%t A117453 s = Split@ Sort@ Flatten@ Table[ n^i, {n, 2, Sqrt@456975}, {i, 2, Log[n,
456975]}]; Union@ Flatten@ Select[s, Length@ # > 1 &] (* Robert G.
Wilson v *)
%Y A117453 Cf. A001597.
%Y A117453 Sequence in context: A118902 A092210 A062320 this_sequence A039370 A129588
A043193
%Y A117453 Adjacent sequences: A117450 A117451 A117452 this_sequence A117454 A117455
A117456
%K A117453 nonn
%O A117453 1,2
%A A117453 Eric Weisstein (eric(AT)weisstein.com), Mar 16, 2006
%E A117453 More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Apr 12 2006
|