|
|
A355062
|
|
Perfect powers whose digits are in nondecreasing order.
|
|
2
|
|
|
4, 8, 9, 16, 25, 27, 36, 49, 125, 128, 144, 169, 225, 256, 289, 1156, 1225, 1369, 1444, 4489, 6889, 11236, 11449, 13456, 13689, 27889, 33489, 111556, 112225, 113569, 134689, 146689, 344569, 444889, 2666689, 2778889, 11115556, 11122225, 11135569, 11336689
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
I.e., numbers of the form b^k with b > 1 and k > 1 in whose base-10 expansion no digit is less than the previous digit.
Includes infinite subsequences such as {16, 1156, 111556, 11115556, ...} and {25, 1225, 112225, 11122225, ...}, so the sequence is infinite.
|
|
LINKS
|
|
|
PROG
|
(Python)
from sympy import perfect_power as pp
from itertools import count, islice, combinations_with_replacement as mc
def agen():
for d in count(1):
ni = (int("".join(m)) for m in mc("123456789", d))
yield from filter(pp, ni)
(PARI) isok(m) = if (ispower(m), my(d=digits(m)); (d == vecsort(d))); \\ Michel Marcus, Jun 18 2022
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|