A096844 -id:A096844 - cp's OEIS frontend

A276137 Numbers without the decimal digits 2, 4, 6 and 8.

0, 1, 3, 5, 7, 9, 10, 11, 13, 15, 17, 19, 30, 31, 33, 35, 37, 39, 50, 51, 53, 55, 57, 59, 70, 71, 73, 75, 77, 79, 90, 91, 93, 95, 97, 99, 100, 101, 103, 105, 107, 109, 110, 111, 113, 115, 117, 119, 130, 131, 133, 135, 137, 139, 150, 151, 153, 155, 157

Offset: 1

Vincenzo Librandi, Aug 22 2016

Cf. A096844 (with at least one 0 digit).

Subsequence of A168501.

[n: n in [0..500] | IsEmpty(Set([2..8 by 2]) meet Set(Intseq(n)))];

Select[Select[Select[Select[Range[0, 400], FreeQ[IntegerDigits@#, 2] &], FreeQ[IntegerDigits@#, 4] &], FreeQ[IntegerDigits@#, 6] &], FreeQ[IntegerDigits@#, 8] &]

my(table=[0,1,3,5,7,9]); a(n) = fromdigits(apply(d->table[d+1],digits(n-1,6))); \\ Kevin Ryde, Jun 26 2021

A098943 Numbers where 6 is the only even decimal digit.

Original entry on oeis.org

6, 16, 36, 56, 61, 63, 65, 66, 67, 69, 76, 96, 116, 136, 156, 161, 163, 165, 166, 167, 169, 176, 196, 316, 336, 356, 361, 363, 365, 366, 367, 369, 376, 396, 516, 536, 556, 561, 563, 565, 566, 567, 569, 576, 596, 611, 613, 615, 616, 617, 619, 631, 633, 635, 636

Offset: 1

Eric Angelini, Oct 21 2004

This is a 10-automatic language. - Charles R Greathouse IV, Oct 03 2011

Michael S. Branicky, Table of n, a(n) for n = 1..10000
Index entries for 10-automatic sequences

Cf. A096844, A098941, A098942, A098944.

for (0..1000) {
    print "$_, " if (/^[135679]*6[135679]*$/)
} # Charles R Greathouse IV, Oct 05 2011

from itertools import product
def agen(maxdigits):
    for digs in range(1, maxdigits+1):
        for p in product("135679", repeat=digs):
            if '6' in p: yield int("".join(p))
print([an for an in agen(3)]) # Michael S. Branicky, Jun 16 2021

cp's OEIS Frontend

A276137 Numbers without the decimal digits 2, 4, 6 and 8.

Views

Author

Keywords

Crossrefs

Programs

Magma

Mathematica

PARI

A098943 Numbers where 6 is the only even decimal digit.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Perl

Python