A376898 Positive numbers k such that all the digits in the octal expansion of k^3 are distinct.

1, 2, 5, 7, 10, 11, 14, 15, 22, 30, 37, 41, 49, 61, 74, 98, 122

Offset

1,2

Comments

There are no terms >= 2^8 because 2^24-1 is the largest eight-digit octal number.

Links

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

Example

11 is a term because 11^3 = 1331 = 2463_8 in octal and no octal digit occurs more than once.

Mathematica

Select[Range[2^8], Length[IntegerDigits[#^3, 8]]==Length[Union[IntegerDigits[#^3, 8]]]&] (* James C. McMahon, Oct 16 2024 *)

Prog

(Python)
for k in range(1, 2**8):
    octal = format(k**3, "o")
    if len(octal) == len(set(octal)): print(k, end=", ")

Crossrefs

Cf. A007094, A129525, A376897.

Sequence in context: A067934 A284470 A112730 * A288602 A049842 A018636

Adjacent sequences: A376895 A376896 A376897 * A376899 A376900 A376901

Keyword

base,fini,full,nonn

Author

Kalle Siukola, Oct 08 2024

Status

approved