A050747 Numbers k such that the decimal expansion of k^8 contains no pair of consecutive equal digits.

0, 1, 2, 3, 5, 6, 7, 9, 13, 14, 15, 16, 19, 22, 23, 25, 27, 33, 34, 37, 45, 48, 52, 58, 59, 64, 71, 77, 85, 91, 94, 101, 104, 106, 107, 112, 116, 119, 121, 126, 128, 132, 133, 138, 147, 151, 162, 173, 182, 184, 186, 195, 211, 228, 232, 244, 245, 269, 271, 279, 292

Offset

1,3

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Select[Range[0, 300], FreeQ[Differences[IntegerDigits[#^8]], 0]&] (* Harvey P. Dale, Jul 05 2023 *)

Crossrefs

Cf. A050755.

Sequence in context: A195060 A153763 A345982 * A261514 A215798 A074780

Adjacent sequences: A050744 A050745 A050746 * A050748 A050749 A050750

Keyword

nonn,base

Author

Patrick De Geest, Sep 15 1999

Status

approved