A061831 Multiples of 9 having only even digits.

0, 288, 468, 486, 648, 666, 684, 828, 846, 864, 882, 2088, 2268, 2286, 2448, 2466, 2484, 2628, 2646, 2664, 2682, 2808, 2826, 2844, 2862, 2880, 4068, 4086, 4248, 4266, 4284, 4428, 4446, 4464, 4482, 4608, 4626, 4644, 4662, 4680, 4806, 4824, 4842, 4860, 6048, 6066

Offset: 1

Author

Amarnath Murthy, May 29 2001

Keywords

• nonn
• base
• easy

Examples

			648 = 9*72 is a term having all even digits.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..10000
• Index entries for 10-automatic sequences.

Crossrefs

Cf. A061829, A305826.

Programs

Maple

f:= proc(k) local L,t;
  L:= convert(k,base,5);
  t:= 2*add(L[i]*10^(i-1),i=1..nops(L));
  if t mod 9 = 0 then t fi
end proc:
map(f, [$0..1000]); # Robert Israel, Jun 10 2018

Mathematica

Select[9*Range[0, 700], AllTrue[IntegerDigits[#], EvenQ] &] (* Harvey P. Dale, Aug 07 2021 *)

PARI

is(n)=n%9==0 && #setintersect(Set(digits(n)), [1,3,5,7,9])==0 \\ Charles R Greathouse IV, Feb 15 2017

Formula

For n >= 2, a(A305826(n)+1) = 2*10^n+88. - Robert Israel, Jun 10 2018

Extensions

Corrected and extended by Larry Reeves (larryr(AT)acm.org), May 30 2001

Offset corrected by Charles R Greathouse IV, Feb 15 2017

Missing term 2880 inserted by Robert Israel, Jun 10 2018