OFFSET
1,2
COMMENTS
64 = 4 * 4 * 4; 1936 = 44 * 44; 1776 = 4 * 444.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
M:= 10^6: # for terms <= M
S:= {1}:
for d from 1 to ilog10(M) do
x:= 4/9*(10^d-1); T:= {}:
for s in S do
T:= T union {seq(s*x^i, i=1..floor(log[x](M/s)))};
od;
S:= S union T;
od:
sort(convert(S, list)); # Robert Israel, Dec 05 2024
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Claudio Meller, Jun 03 2009
EXTENSIONS
Corrected and extended by Claudio Meller, Jun 06 2009
Corrected and extended by Claudio Meller, Jun 27 2009
1 added by N. J. A. Sloane, Dec 04 2017
STATUS
approved