A039367 Numbers whose base-9 representation has the same nonzero number of 1's and 4's.

13, 37, 85, 103, 112, 117, 119, 120, 122, 123, 124, 125, 130, 139, 148, 157, 175, 199, 256, 280, 325, 333, 335, 336, 338, 339, 340, 341, 343, 352, 370, 379, 388, 397, 418, 442, 499, 523, 580, 604, 661, 685, 733, 751, 760, 765, 767, 768, 770, 771, 772, 773, 778

Offset

1,1

Links

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

Mathematica

Select[Range[1000], DigitCount[#, 9, 1]==DigitCount[#, 9, 4]>0&] (* Harvey P. Dale, Aug 16 2012 *)

Prog

(MATLAB) x = 0:778; d = dec2base(x, 9)-'0'; s1 = sum(d==1, 2); s2 = sum(d==4, 2); a = x(s1==s2 & s1>0); disp(regexprep(num2str(a), ' +', ', ')) % Chris R. Rehmann, Apr 05 2026

Crossrefs

Cf. A007095, A039086.

Cf. A039365, A039366, A039368, A039369, A039370, A039371.

Cf. A039360, A039373, A039378.

Sequence in context: A155264 A155267 A157837 * A139697 A124706 A145990

Adjacent sequences: A039364 A039365 A039366 * A039368 A039369 A039370

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved