A038690 a(n)^2 is smallest square containing the string 'n'.

0, 1, 5, 6, 2, 5, 4, 24, 9, 3, 10, 34, 11, 37, 12, 34, 4, 42, 43, 14, 45, 11, 15, 48, 18, 5, 51, 52, 17, 23, 48, 56, 18, 58, 59, 66, 6, 61, 62, 63, 20, 21, 65, 66, 12, 116, 68, 69, 22, 7, 50, 72, 23, 73, 74, 166, 16, 24, 126, 77, 40, 19, 25, 128, 8, 81, 108, 26, 41, 13, 52, 131

Offset: 0

Author

Hans Havermann

Keywords

• base
• nonn

Comments

"Containment" implies here that the digits of n are consecutive digits in the square; see A091873 for a relaxed alternative. [R. J. Mathar, Dec 09 2008]

Links

• Michael De Vlieger, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A018851, A029944, A068165, A091873.

Programs

Mathematica

Table[ i=0; While[ StringPosition[ ToString[ i^2 ], ToString[ n ] ]=={}, i++ ]; i, {n, 0, 80} ]