login
Numbers of form 2^k (for values of k see A050723) containing no pair of consecutive equal digits (probably finite).
0

%I #12 Oct 16 2019 01:19:13

%S 1,2,4,8,16,32,64,128,256,512,1024,2048,4096,8192,16384,32768,131072,

%T 1048576,2097152,4194304,268435456,536870912,1073741824,2147483648,

%U 4294967296,17179869184,34359738368,68719476736,137438953472

%N Numbers of form 2^k (for values of k see A050723) containing no pair of consecutive equal digits (probably finite).

%H <a href="/index/Di#divseq">Index to divisibility sequences</a>

%e 2^18 = 262144 is missing, for example.

%t Select[2^Range[0,40],FreeQ[Differences[IntegerDigits[#]],0] &] (* _Jayanta Basu_, May 31 2013 *)

%Y Cf. A043096, A050723.

%K nonn,base

%O 1,2

%A _Patrick De Geest_, Sep 15 1999