A370855 Numbers m such that c(0) < c(1) <= c(2), where c(k) = number of k's in the ternary representation of m.

5, 7, 17, 23, 25, 44, 50, 52, 53, 68, 70, 71, 76, 77, 79, 98, 104, 106, 116, 128, 132, 134, 140, 142, 146, 150, 152, 154, 156, 158, 160, 161, 176, 178, 184, 194, 196, 200, 204, 206, 208, 210, 212, 214, 215, 220, 226, 228, 230, 232, 233, 238, 239, 241, 296, 314

Offset

1,1

Links

Chris R. Rehmann, Table of n, a(n) for n = 1..10000

Example

The ternary representation of 7 is 21, for which c(0)=0 < c(1)=1 <= c(2)=1. So 7 is in the sequence.

Mathematica

Select[Range[1000], DigitCount[#, 3, 0] < DigitCount[#, 3, 1] <= DigitCount[#, 3, 2] &]

Prog

(MATLAB) nmax = 1000; n = 1:nmax; for k = 1:nmax, c = arrayfun(@(m) sum(dec2base(k, 3)-'0'==m), 0:2); tf(k) = c(1)<c(2) && c(2)<=c(3); end, a = n(tf); % Chris R. Rehmann, Oct 12 2025

Crossrefs

Cf. A007089, A370853, A370854, A370856.

Sequence in context: A164120 A342799 A043879 * A044966 A359297 A283159

Adjacent sequences: A370852 A370853 A370854 * A370856 A370857 A370858

Keyword

nonn,base

Author

Clark Kimberling, Mar 03 2024

Status

approved