A296698 Numbers whose base-5 digits d(m), d(m-1), ... d(0) have #(rises) > #(falls); see Comments.

7, 8, 9, 13, 14, 19, 32, 33, 34, 37, 38, 39, 43, 44, 49, 63, 64, 68, 69, 74, 94, 99, 132, 133, 134, 138, 139, 144, 157, 158, 159, 162, 163, 164, 168, 169, 174, 176, 177, 178, 179, 182, 183, 184, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199

Offset

1,1

Comments

A rise is an index i such that d(i) < d(i+1); a fall is an index i such that d(i) > d(i+1). The sequences A296697-A296699 partition the natural numbers. See the guide at A296712.

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Example

The base-5 digits of 199 are 1,2,4,4; here #(rises) = 2 and #(falls) = 0, so 199 is in the sequence.

Mathematica

z = 200; b = 5; d[n_] := Sign[Differences[IntegerDigits[n, b]]];
Select[Range [z], Count[d[#], -1] == Count[d[#], 1] &] (* A296697 *)
Select[Range [z], Count[d[#], -1] < Count[d[#], 1] &]  (* A296698 *)
Select[Range [z], Count[d[#], -1] > Count[d[#], 1] &]  (* A296699 *)

Crossrefs

Cf. A296697, A296699, A296712.

Sequence in context: A309152 A170933 A297257 * A297131 A289740 A289760

Adjacent sequences: A296695 A296696 A296697 * A296699 A296700 A296701

Keyword

nonn,base

Author

Clark Kimberling, Dec 21 2017

Status

approved