[go: up one dir, main page]

login
A043618
Numbers whose base-7 representation has exactly 3 runs.
0
50, 51, 52, 53, 54, 55, 63, 64, 66, 67, 68, 69, 70, 71, 72, 74, 75, 76, 77, 78, 79, 80, 82, 83, 84, 85, 86, 87, 88, 90, 91, 92, 93, 94, 95, 96, 99, 100, 101, 102, 103, 104, 105, 107, 108, 109, 110, 111, 119, 120, 121, 123, 124, 125, 126
OFFSET
1,1
MATHEMATICA
Select[Range[200], Length[Split[IntegerDigits[#, 7]]]==3&] (* Harvey P. Dale, Jul 04 2021 *)
CROSSREFS
Cf. A007093.
Sequence in context: A165871 A171652 A078289 * A296874 A134691 A139182
KEYWORD
nonn,base
STATUS
approved