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

0, 1, 8, 27, 64, 283, 290, 512, 545, 1948, 2320, 4096, 4360, 8452, 13813, 16158, 16642, 23063, 26139, 27427, 27734, 32768, 33025, 67616, 87723, 110503, 129264, 130591, 133136, 184504, 206573, 226094, 262144, 264200, 526340, 701784, 1044728, 1050626

Offset

1,3

Links

Table of n, a(n) for n=1..38.

Mathematica

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

Crossrefs

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

Sequence in context: A112662 A121652 A112989 * A248705 A030293 A030479

Adjacent sequences: A018829 A018830 A018831 * A018833 A018834 A018835

Keyword

nonn,base

Author

David W. Wilson

Status

approved