OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..7046
T. Chinburg and M. Henriksen, Sums of k-th powers in the ring of polynomials with integer coefficients, Acta Arithmetica, 29 (1976), 227-250.
MAPLE
N::= 20: # for terms <= 10^N
R:= {1}:
for n from 1 to 2*N do
R:= R union select(`<=`, {seq((10^n-1)/(10^d-1), d = numtheory:-divisors(n))}, 10^N);
od:
sort(convert(R, list)); # Robert Israel, May 19 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 06 2002
STATUS
approved