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 A121036 #20 Jul 10 2022 09:43:20
%S A121036 16,160,416,816,1168,1216,1600,1616,1632,1648,1664,1680,1696,2016,
%T A121036 2160,2416,2816,3168,3216,3616,4016,4160,4416,4816,5168,5216,5616,
%U A121036 6016,6160,6416,6816,7168,7216,7616,8016,8160,8416,8816,9168,9216,9616,10016
%N A121036 Multiples of 16 containing a 16 in their decimal representation.
%H A121036 Harvey P. Dale, <a href="/A121036/b121036.txt">Table of n, a(n) for n = 1..1000</a>
%H A121036 <a href="/index/Ar#10-automatic">Index entries for 10-automatic sequences</a>.
%F A121036 a(n) ~ 16n. - _Charles R Greathouse IV_, Jul 16 2011
%t A121036 seqMemberQ[lst_,seq_]:=MemberQ[Partition[lst,Length[seq],1],seq]
%t A121036 m16Q[n_]:=seqMemberQ[IntegerDigits[n],{1,6}]
%t A121036 Select[16Range[1000],m16Q] (* _Harvey P. Dale_, Feb 26 2011 *)
%t A121036 Select[16Range[1000],SequenceCount[IntegerDigits[#],{1,6}]>0&] (* The program uses the SequenceCount function from Mathematica version 10 *) (* _Harvey P. Dale_, Apr 12 2016 *)
%o A121036 (PARI) is(n)=if(n%16,return(0));n=eval(Vec(Str(n)));for(i=2,#n,if(n[i]==6&&n[i-1]==1,return(1)));0
%Y A121036 Cf. A121041, A008598, A011531, A121022, A121023, A121024, A121025, A121026, A121027, A121028, A121029, A121030, A121031, A121032, A121033, A121034, A121035, A121037, A121038, A121039, A121040.
%K A121036 nonn,base,easy
%O A121036 1,1
%A A121036 _Reinhard Zumkeller_, Jul 21 2006
%E A121036 Corrected by _Harvey P. Dale_, Feb 26 2011