OFFSET
1,2
COMMENTS
Some of the terms are automorphic numbers (A003226) multiplied by an appropriate power of 10. a(25) > 10^15. - Giovanni Resta, Jul 29 2013
REFERENCES
Computed by Robert Israel.
EXAMPLE
a(5)=3792 because 3792^2 = 14379264 has 3792 as its middle digits.
MATHEMATICA
Do[ If[ StringPosition[ ToString[n^2], ToString[n]] [[1, 1]] == (Ceiling[ Log[10, n^2] ] - Ceiling[ Log[10, n] ])/2 + 1, Print[n] ], {n, 1, 10^9} ]
CROSSREFS
KEYWORD
nonn,base,nice
AUTHOR
Brian Wallace (wallacebrianedward(AT)yahoo.co.uk), Jun 28 2001
EXTENSIONS
Corrected and extended by Robert G. Wilson v, Aug 08 2001
a(15)-a(24) from Giovanni Resta, Jul 29 2013
STATUS
approved