|
Search: id:A071913
|
|
| |
|
| 1, 4, 9, 27, 81, 256, 1024, 4096, 16384, 78125, 390625, 1953125, 10077696, 60466176, 362797056, 2176782336, 13841287201, 96889010407, 678223072849, 4747561509943, 35184372088832, 281474976710656, 2251799813685248
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
All of entries shown are perfect powers.
|
|
MATHEMATICA
|
a = Table[0, {15}]; Do[ b = Length[ Union[ Table[ Floor[n^(1/k)], {k, 2, 20}]]]; If[ a[[b]] == 0, a[[b]] = n], {n, 1, 10^6}]; a
|
|
CROSSREFS
|
Cf. A069624.
Sequence in context: A164342 A034527 A111962 this_sequence A007872 A087726 A101973
Adjacent sequences: A071910 A071911 A071912 this_sequence A071914 A071915 A071916
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 14 2002
|
|
|
Search completed in 0.002 seconds
|