OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
MAPLE
M:= 10: # for terms k where k^3 has up to M digits
R:= 0:
for d from 1 to M do
x0:= ceil((sqrt(1+4*10^(d-1))-1)/2);
x1:= floor((sqrt(1+4*(10^d-1))-1)/2);
L:= {seq(sort(convert(n*(n+1), base, 10)), n=x0..x1)};
R:= R, op(select(t -> member(sort(convert(t^3, base, 10)), L), [$ ceil(10^((d-1)/3)) .. floor((10^d-1)^(1/3))]))
od:
R; # Robert Israel, May 21 2026
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Claudio Meller, Jul 01 2009
EXTENSIONS
Edited and extended by Ray Chandler, Jul 09 2009
STATUS
approved
