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 A072941 #13 Jan 27 2014 11:45:46 %S A072941 1,2,3,4,5,6,7,8,9,30,11,12,13,210,15,16,17,18,19,60,105,2310,23,24, %T A072941 25,30030,27,420,29,30,31,32,1155,510510,35,36,37,9699690,15015,120, %U A072941 41,210,43,4620,45,223092870,47,48,49,150,255255,60060,53,54,385 %N A072941 Least multiple of n having no prime gaps. %C A072941 a(n) = smallest m such that m is a multiple of n and in the prime factorization of m every prime between the smallest prime factor of n and the largest appears at least once. %C A072941 A073490(a(n))=0; a(n)=n iff A073490(A007947(n))=0; A006530(a(n)) = A006530(n); A020639(a(n)) = A020639(n); A001221(n) <= A001221(a(n)); A001221(a(n))=A049084(A006530(n))-A049084(A020639(n))+1; A001222(n) <= A001222(a(n)); A001222(a(n)) + A001221(n) = A001221(a(n)) + A001222(n). %H A072941 Reinhard Zumkeller, <a href="/A072941/b072941.txt">Table of n, a(n) for n = 1..1000</a> %F A072941 a(n)=A002110(A049084(A006530(n)))*A003557(n)/A002110(A049084(A020639(n))-1). %e A072941 a(99)=a(3*3*11)=3*3*5*7*11=3465. %o A072941 (Haskell) %o A072941 a072941 n = product $ zipWith (^) ps $ map (max 1) es where %o A072941 (ps, es) = unzip $ dropWhile ((== 0) . snd) $ %o A072941 zip a000040_list $ a067255_row n %o A072941 -- _Reinhard Zumkeller_, Dec 21 2013 %Y A072941 Cf. A073490, A074044, A067255. %K A072941 nonn,look %O A072941 1,2 %A A072941 _Reinhard Zumkeller_, Aug 12 2002 %E A072941 Example corrected by _Nadia Heninger_, Jul 06 2005