A043792 Numbers whose number of runs in base 3 is congruent to 1 (mod 7).

1, 2, 4, 8, 13, 26, 40, 80, 121, 242, 364, 728, 1093, 2186, 2460, 2462, 2463, 2464, 2476, 2477, 2478, 2480, 2487, 2489, 2490, 2491, 2494, 2495, 2499, 2500, 2602, 2603, 2607, 2608, 2611, 2612, 2613, 2615, 2622, 2624, 2625

Offset

1,2

Links

Table of n, a(n) for n=1..41.

Mathematica

Select[Range[3000], Mod[Length[Split[IntegerDigits[#, 3]]], 7]==1&] (* Harvey P. Dale, Jul 25 2019 *)

Crossrefs

Cf. A007089.

Sequence in context: A043777 A043781 A043786 * A043799 A043807 A043816

Adjacent sequences: A043789 A043790 A043791 * A043793 A043794 A043795

Keyword

nonn,base

Author

Clark Kimberling

Status

approved