A007928 Numbers containing an even digit.

0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 32, 34, 36, 38, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 52, 54, 56, 58, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 72, 74, 76, 78, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 92, 94, 96, 98, 100

Offset: 1

Author

R. Muller

Keywords

• nonn
• base
• easy

Comments

Or, numbers whose product of digits is even.

Complement of A014261; A196563(a(n)) > 0. - Reinhard Zumkeller, Oct 04 2011

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
• F. Smarandache, Only Problems, Not Solutions!, Xiquan Publ., Phoenix-Chicago, 1993.
• Index entries for 10-automatic sequences.

Programs

Haskell

import Data.List (findIndices)
a007928 n = a007928_list !! (n-1)
a007928_list = findIndices (> 0) a196563_list
-- Reinhard Zumkeller, Oct 04 2011

Magma

[ n : n in [0..129] | IsEven(&*Intseq(n,10)) ];

PARI

is(n)=vecmin(Set(digits(n)%2))==0 \\ Charles R Greathouse IV, Feb 14 2017

Formula

a(n) ~ n. - Charles R Greathouse IV, Sep 07 2012