OFFSET
1,1
LINKS
Lars Blomberg, Table of n, a(n) for n = 1..10000
EXAMPLE
2^2 = (4), 136^2 = 18(4)96, 1017^2 = 103(4)289.
MATHEMATICA
Select[Range[1200], OddQ[IntegerLength[#^2]]&&IntegerDigits[#^2][[(IntegerLength[ #^2]+1)/2]]==4&] (* Harvey P. Dale, Jun 05 2017 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Lars Blomberg, Dec 22 2016
STATUS
approved