A166498 Integers formed by concatenating squares.
0, 1, 4, 9, 10, 11, 14, 16, 19, 25, 36, 40, 41, 44, 49, 64, 81, 90, 91, 94, 99, 100, 101, 104, 109, 110, 111, 114, 116, 119, 121, 125, 136, 140, 141, 144, 149, 160, 161, 164, 169, 181, 190, 191, 194, 196, 199, 225, 250, 251, 254, 256, 259, 289, 324, 360, 361
Offset: 1
Examples
11 being the concatenation of 1 and 1, both squares, is in the sequence. 120 is not in the sequence as none of 2, 12, 20 and 120 are squares. - corrected by _Peter Munn_, Nov 17 2017
Programs
-
Mathematica
Take[FromDigits[Flatten[IntegerDigits/@#]]&/@Tuples[Range[0,20]^2,3]//Union,60] (* Harvey P. Dale, May 25 2025 *)
Extensions
Corrected and extended by Michel Marcus, Oct 16 2013
Mispositioning of example corrected by Peter Munn, Nov 17 2017