0,3

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

Table of n, a(n) for n=0..71.

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

Cf. A018851, A068165, A029944.

Sequence in context: A060011 A021068 A091873 * A154801 A253094 A217015

Adjacent sequences: A038687 A038688 A038689 * A038691 A038692 A038693

base,nonn

Hans Havermann

approved