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 A162689 #7 Nov 21 2013 12:49:39
%S A162689 9,18,36,63,90,144,306
%N A162689 Strictly positive numbers n such that (18*n)/(18+n) are integers.
%C A162689 The 18th row of A127730.
%C A162689 The ansatz 18*n/(18+n)=j (any integer j) yields n=18*j/(18-j) which demonstrates that the sequence is finite if n>=0. [R. J. Mathar, Jul 13 2009]
%t A162689 f[a_,b_]:=(a*b)/(a+b); a=18;lst={};Do[If[f[a,n]==IntegerPart[f[a,n]],AppendTo[lst,n]],{n,9!}];lst
%t A162689 Select[Range[400],IntegerQ[(18#)/(18+#)]&] (* _Harvey P. Dale_, Nov 12 2011 *)
%Y A162689 Cf. A162688
%Y A162689 Cf. A127730. [From _Franklin T. Adams-Watters_, Aug 07 2009]
%K A162689 nonn,fini,full
%O A162689 1,1
%A A162689 _Vladimir Joseph Stephan Orlovsky_, Jul 10 2009
%E A162689 Edited by _R. J. Mathar_, Jul 13 2009