OFFSET
1,1
COMMENTS
(10^(k+1)-1)/3 - 10^k + 2 are terms for k > 1. Conjecture: except for 2354235, 2333524235, and 23333524235, all terms are of this form. - Chai Wah Wu, Sep 10 2017
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..40 (n = 1..31 from Hiroaki Yamanouchi)
MATHEMATICA
fQ[n_] := Block[{d = DigitCount@ n}, Plus @@ Prepend[Take[d, {6, 10}], First@ d] == 0 && d[[2]] > 0 && d[[5]] > 0]; Select[Range@ 1000000, fQ@ # && fQ[#^2] &] (* Michael De Vlieger, Apr 20 2015 *)
PROG
(PARI) is(n) = vecmin(digits(n))==2 && vecmin(digits(n^2))==2 && vecmax(digits(n))==5 && vecmax(digits(n^2))==5
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Felix Fröhlich, Apr 20 2015
EXTENSIONS
a(11)-a(20) from Hiroaki Yamanouchi, May 04 2015
STATUS
approved