A018830 Numbers n such that n is a substring of its square in base 6 (written in base 10).

0, 1, 3, 4, 6, 9, 18, 24, 28, 36, 54, 81, 108, 136, 144, 168, 216, 324, 486, 648, 816, 864, 1008, 1216, 1296, 1944, 2916, 3888, 4896, 5184, 6048, 6458, 6561, 7296, 7776, 8451, 11664, 16768, 17496, 22779, 23328, 23985, 29376, 29889, 31104, 34299, 34549, 36288

Offset: 1

Author

David W. Wilson

Keywords

• nonn
• base

Crossrefs

Cf. A018826 (base 2), A018827 (base 3), A018828 (base 4), A018829 (base 5), A018831 (base 7), A018832 (base 8), A018833 (base 9), A018834 (base 10).

Programs

Mathematica

Select[Range[0, 10^5], StringContainsQ[IntegerString[#^2, 6], IntegerString[#, 6]] &] (* Paolo Xausa, Apr 05 2024 *)