[go: up one dir, main page]

login
A018832
Numbers n such that n is a substring of its square in base 8 (written in base 10).
8
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
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
KEYWORD
nonn,base
STATUS
approved