OFFSET
1,1
COMMENTS
For any term a(n), all numbers of the form a(n)*10^k, k >= 0, are in this sequence. Primitive terms, i.e., not of this form (or equivalently: without trailing '0'), are 5, 8, 74, 81, 107, 171, 177, 237, 351, 378, 468, 487, 605, 684, 737, 1064, 1271, 1311, 1365, 1474, 1605, 1645, 1724, 1758, ...
LINKS
Robert Israel, Table of n, a(n) for n = 1..2500
EXAMPLE
8 is in the sequence because the largest digit of 8^3 = 512 is 5.
MAPLE
filter:= proc(n) max(convert(n^3, base, 10))=5 end proc:
select(filter, [$1..10^4]); # Robert Israel, Nov 28 2025
MATHEMATICA
Select[Range[5000], Max[IntegerDigits[#^3]] == 5 &] (* Paolo Xausa, Dec 04 2025 *)
PROG
(PARI) for(n=1, 2e8, vecmax(digits(n^3))==5&&print1(n", "))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Nov 12 2017
STATUS
approved
