A033005 Every run of digits of n in base 7 has length 2.

8, 16, 24, 32, 40, 48, 392, 408, 416, 424, 432, 440, 784, 792, 808, 816, 824, 832, 1176, 1184, 1192, 1208, 1216, 1224, 1568, 1576, 1584, 1592, 1608, 1616, 1960, 1968, 1976, 1984, 1992, 2008, 2352, 2360, 2368, 2376, 2384, 2392

Offset

1,1

Comments

See A043291 and A033001 through A033014 for the analog in other bases, A033015 - A033029 for the variants with run lengths >= 2. - M. F. Hasler, Feb 02 2014

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1500

Formula

a(n) = 8*A043311(n) (= 8*n for n<7). - M. F. Hasler, Feb 02 2014

Mathematica

Select[Range[2500], Union[Length/@Split[IntegerDigits[#, 7]]]=={2}&] (* Harvey P. Dale, Oct 24 2011 *)

Crossrefs

Sequence in context: A031488 A020335 A044833 * A072066 A342018 A369035

Adjacent sequences: A033002 A033003 A033004 * A033006 A033007 A033008

Keyword

nonn,base

Author

Clark Kimberling

Status

approved