A050740 Numbers of form 11^k (values of k see A050731) containing no pair of consecutive equal digits (probably finite).
1, 121, 14641, 161051, 19487171, 2357947691, 25937424601, 3138428376721, 45949729863572161
Offset: 0
Programs
-
Mathematica
Select[11^Range[0,20],Min[Abs[Differences[IntegerDigits[#]]]]>0&] (* Harvey P. Dale, Jan 03 2024 *)