|
| |
|
|
A062118
|
|
Numbers n such that n^2 has n as its middle digits.
|
|
1
| |
|
|
1, 50, 60, 250, 3792, 7600, 376000, 495475, 625000, 971582, 66952741, 93760000, 177656344, 3199268655
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
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
| n^2 is given in A062120.
Sequence in context: A046832 A046834 A046836 * A167329 A179796 A109552
Adjacent sequences: A062115 A062116 A062117 * A062119 A062120 A062121
|
|
|
KEYWORD
| nonn,base,nice
|
|
|
AUTHOR
| Brian Wallace (wallacebrianedward(AT)yahoo.co.uk), Jun 28 2001
|
|
|
EXTENSIONS
| Corrected and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 08 2001
|
| |
|
|
