A039403 Numbers whose base-10 representation has the same nonzero number of 1's and 3's.

13, 31, 103, 123, 130, 132, 134, 135, 136, 137, 138, 139, 143, 153, 163, 173, 183, 193, 213, 231, 301, 310, 312, 314, 315, 316, 317, 318, 319, 321, 341, 351, 361, 371, 381, 391, 413, 431, 513, 531, 613, 631, 713, 731, 813, 831, 913, 931, 1003, 1023

Offset

1,1

Links

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

Mathematica

Select[Range[1100], DigitCount[#, 10, 1]==DigitCount[#, 10, 3]>0&] (* Harvey P. Dale, May 09 2019 *)

Crossrefs

Sequence in context: A350095 A160772 A271575 * A062339 A368051 A043226

Adjacent sequences: A039400 A039401 A039402 * A039404 A039405 A039406

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved