OFFSET
1,1
COMMENTS
For any term a(n), all numbers of the form a(n)*10^k, k >= 0, are in this sequence. We could call "primitive" the terms not of this form, i.e., without trailing '0'.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
12 is in the sequence because the largest digit of 12^3 = 1728 is 8.
MAPLE
filter:= n -> max(convert(n^3, base, 10))=8:
select(filter, [$1..1000]); # Robert Israel, Jul 03 2020
MATHEMATICA
Select[Range[300], Max[IntegerDigits[#^3]]==8&] (* Harvey P. Dale, Aug 21 2019 *)
PROG
(PARI) for(n=1, 500, vecmax(digits(n^3))==8&&print1(n", "))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Nov 13 2017
STATUS
approved