A121024 Multiples of 4 containing a 4 in their decimal representation.

4, 24, 40, 44, 48, 64, 84, 104, 124, 140, 144, 148, 164, 184, 204, 224, 240, 244, 248, 264, 284, 304, 324, 340, 344, 348, 364, 384, 400, 404, 408, 412, 416, 420, 424, 428, 432, 436, 440, 444, 448, 452, 456, 460, 464, 468, 472, 476, 480, 484, 488, 492, 496

Offset: 1

Author

Reinhard Zumkeller, Jul 21 2006

Keywords

• nonn
• base
• easy

Comments

Intersection of A008586 and A011534.

Links

• Index entries for 10-automatic sequences.

Crossrefs

Cf. A121041, A011531, A121022, A121023, A121025, A121026, A121027, A121028, A121029, A121030, A121031, A121032, A121033, A121034, A121035, A121036, A121037, A121038, A121039, A121040.

Programs

Mathematica

Select[4Range[150],DigitCount[#,10,4]>0&] (* Harvey P. Dale, Jun 11 2011 *)

PARI

is(n)=if(n%4,return(0));n=eval(Vec(Str(n)));for(i=1,#n,if(n[i]==4,return(1)));0 \\ Charles R Greathouse IV, Jul 16 2011

Formula

a(n) ~ 4n. - Charles R Greathouse IV, Jul 16 2011

Extensions

Typo in comment fixed by Reinhard Zumkeller, May 01 2011