OFFSET
1,2
LINKS
Kenny Lau, Table of n, a(n) for n = 1..20001
EXAMPLE
19044 is in the sequence because it is a square (138^2) and is also a cyclops number (odd number of digits, middle digit is the only zero).
11025 is in the sequence because it is a square (105^2) and is also a cyclops number (odd number of digits, middle digit is the only zero). - Michael B. Porter, Jul 09 2016
MATHEMATICA
Select[Range[0, 1200]^2, And[OddQ@ Length@ #, #[[Ceiling[Length[#]/2]]] == 0, Count[#, 0] == 1] &@ IntegerDigits@ # &] (* Michael De Vlieger, Jul 08 2016 *)
cnQ[n_]:=Module[{len=IntegerLength[n]}, OddQ[len]&&DigitCount[n, 10, 0]==1 && IntegerDigits[n][[(len+1)/2]]==0]; Join[{0}, Select[Range[1200]^2, cnQ]] (* Harvey P. Dale, Mar 19 2018 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Omar E. Pol, Jun 08 2009
STATUS
approved