A121039 Multiples of 19 containing a 19 in their decimal representation.

19, 190, 1197, 1900, 1919, 1938, 1957, 1976, 1995, 3192, 3819, 4199, 5719, 6194, 7619, 9196, 9519, 11191, 11419, 11913, 11932, 11951, 11970, 11989, 12198, 13319, 14193, 15219, 17119, 17195, 19000, 19019, 19038, 19057, 19076, 19095, 19114

Offset: 1

Author

Reinhard Zumkeller, Jul 21 2006

Keywords

• nonn
• base
• easy

Links

• Index entries for 10-automatic sequences.

Crossrefs

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

Programs

Mathematica

Select[19*Range[1500],MemberQ[Partition[IntegerDigits[#],2,1],{1,9}]&] (* Harvey P. Dale, Jun 08 2014 *)

PARI

is(n)=if(n%19, return(0)); while(n>18, if(n%100==19, return(1)); n\=10); 0 \\ Charles R Greathouse IV, Feb 12 2017

Formula

a(n) ~ 19n. - Charles R Greathouse IV, Feb 12 2017

Extensions

Corrected by T. D. Noe, Oct 25 2006