This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A121038 #13 Feb 12 2017 21:53:40
%S A121038 18,180,918,1188,1800,1818,1836,1854,1872,1890,2718,3186,3618,4518,
%T A121038 5184,5418,6318,7182,7218,8118,9018,9180,9918,10188,10818,11718,11808,
%U A121038 11826,11844,11862,11880,11898,12186,12618,13518,14184,14418,15318,16182
%N A121038 Multiples of 18 containing a 18 in their decimal representation.
%H A121038 Harvey P. Dale, <a href="/A121038/b121038.txt">Table of n, a(n) for n = 1..1000</a>
%H A121038 <a href="/index/Ar#10-automatic">Index entries for 10-automatic sequences</a>.
%F A121038 a(n) ~ 18n. - _Charles R Greathouse IV_, Feb 12 2017
%t A121038 Select[18*Range[1000],SequenceCount[IntegerDigits[#],{1,8}]>0&] (* The program uses the SequenceCount function from Mathematica version 10 *) (* _Harvey P. Dale_, May 01 2016 *)
%o A121038 (PARI) is(n)=if(n%18, return(0)); while(n>17, if(n%100==18, return(1)); n\=10); 0 \\ _Charles R Greathouse IV_, Feb 12 2017
%Y A121038 Cf. A121041, A008600, A011531, A121022, A121023, A121024, A121025, A121026, A121027, A121028, A121029, A121030, A121031, A121032, A121033, A121034, A121035, A121036, A121037, A121039, A121040.
%K A121038 nonn,base,easy
%O A121038 1,1
%A A121038 _Reinhard Zumkeller_, Jul 21 2006
%E A121038 Corrected by _T. D. Noe_, Oct 25 2006