OFFSET
1,2
COMMENTS
The first condition is added to exclude terms of the form a(k)*2^m (m>0), whose square would just have 0's appended w.r.t. a(k)^2 when written in base 4, and therefore trivially have no digit > 1 in base 4.
See A230030 for the base 5 analog, which is much more challenging.
PROG
(PARI) b=4; forstep(n=1, 10^8, 2, vecmax(digits(n^2, b))>1||print1(n", "))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, May 02 2015
STATUS
approved