OFFSET
0,3
LINKS
Zak Seidov, Table of n, a(n) for n = 0..600
E. Angelini, Sum of squares -- and a concatenation, SeqFan list, June 23, 2015.
PROG
(PARI) A055016(n, q=9, m)={ n>1||return(n); forstep(q=min(sqrtint(n), q), 1, -1, m && n \ q^2 * #Str(q) > #Str(m) && break; t=eval(Str(A055016(n-q^2, q), q)); (!m || t<m) && m=t); m } \\ M. F. Hasler, Jun 24 2015
CROSSREFS
KEYWORD
base,nonn,changed
AUTHOR
Henry Bottomley, May 31 2000
STATUS
approved