close
login
A050737
Numbers of form 7^k (values of k see A050728) containing no pair of consecutive equal digits (probably finite).
0
1, 7, 49, 343, 2401, 16807, 823543, 5764801, 40353607, 282475249, 13841287201, 232630513987207, 65712362363534280139543
OFFSET
0,2
MATHEMATICA
Select[7^Range[0, 200], !MemberQ[Differences[IntegerDigits[#]], 0]&] (* Vincenzo Librandi, Jan 22 2026 *)
PROG
(Magma) [7^n : n in [0..200] | not exists{i : i in [1..#d-1] | d[i+1] - d[i] eq 0} where d is Intseq(7^n) ]; // Vincenzo Librandi, Jan 22 2026
CROSSREFS
Subsequence of A000420.
Sequence in context: A206453 A000420 A373283 * A195908 A033143 A388410
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Sep 15 1999
STATUS
approved