OFFSET
1,1
LINKS
Lars Blomberg, Table of n, a(n) for n = 1..10000
EXAMPLE
111^2 = 12(3)21, 231^2 = 53(3)61, 1214^2 = 147(3)796.
MATHEMATICA
ond3Q[n_]:=Module[{idn2=IntegerDigits[n^2], len}, len=Length[idn2]; OddQ[ len] && idn2[[(len+1)/2]]==3]; Select[Range[1400], ond3Q] (* Harvey P. Dale, Apr 06 2018 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Lars Blomberg, Dec 22 2016
STATUS
approved