|
Search: id:A069701
|
|
|
| A069701 |
|
Squares with internal digits also forming a square > 0. |
|
+0 1
|
|
| 144, 196, 441, 841, 1369, 3364, 4096, 5041, 8649, 10816, 11449, 20164, 38416, 61009, 64009, 77841, 117649, 132496, 170569, 231361, 249001, 288369, 310249, 405769, 564001, 619369, 1004004, 1077444, 1129969, 2163841, 2256004, 3013696
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
EXAMPLE
|
3364 is a member as 3364 and 36 both are squares.
|
|
MATHEMATICA
|
nzsqr[n_] := n>0&&IntegerQ[Sqrt[n]]; Select[Range[10, 2000], nzsqr[FromDigits[Drop[Drop[IntegerDigits[ #^2], 1], -1]]]&]^2
|
|
CROSSREFS
|
Adjacent sequences: A069698 A069699 A069700 this_sequence A069702 A069703 A069704
Sequence in context: A035090 A064021 A135780 this_sequence A124144 A061040 A064563
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Apr 06 2002
|
|
EXTENSIONS
|
Edited by Dean Hickerson (dean(AT)math.ucdavis.edu), Apr 09 2002
|
|
|
Search completed in 0.002 seconds
|