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 A162824 #7 Feb 21 2019 23:26:38 %S A162824 12,16,24,30,32,36,39,40,42,44,45,46,47,48,49,50,51,52,54,56,57,60,64, %T A162824 66,72,80,84,96,112,120,144,176,192,240,304,336,432,624,816,1200,2352 %N A162824 Positive numbers k such that 48*k/(48-k) are integers. %C A162824 The number k=48 is explicitly included. %C A162824 Row 48 of A191973. %p A162824 for m from 1 to 2352 do if(m=48 or m*48 mod (m-48) = 0)then printf("%d, ", m): fi: od: # _Nathaniel Johnston_, Jun 22 2011 %t A162824 f[a_,b_]:=(a*b)/(a-b); a=48;lst={};Do[If[f[a,n]==IntegerPart[f[a,n]], AppendTo[lst,n]],{n,9!}];lst %Y A162824 Cf. A162688, A162689, A162690, A162691, A162692, A162693, A162694, A162817, A162818, A162819, A162820, A162821, A162822, A162823, A191973. %K A162824 nonn,fini,full,easy %O A162824 1,1 %A A162824 _Vladimir Joseph Stephan Orlovsky_, Jul 13 2009 %E A162824 Keywords fini,full added by _R. J. Mathar_, Jul 31 2009