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 A133689 #11 Sep 16 2015 13:45:19 %S A133689 3,4,6,6,12,8,12,12,20,12,24,14,28,30,24,18,36,20,40,42,44,24,48,30, %T A133689 52,36,56,30,60,32,48,66,68,70,72,38,76,78,80,42,84,44,88,90,92,48,96, %U A133689 56,100,102,104,54,108,110,112,114,116,60 %N A133689 a(n) = smallest integer that is > n and is a multiple of every proper divisor of n. %C A133689 a(n) = A048671(n) + n. %e A133689 The proper divisors of 16 are 1,2,4,8. a(16)=24 is the smallest integer which is both > 16 and is a multiple of 1, of 2, of 4 and of 8. %t A133689 a = {}; For[n = 2, n < 60, n++, i = n + 1; While[Length[Union[Mod[i, Complement[Divisors[n], {n}]]]] > 1, i++ ]; AppendTo[a, i]]; a (* _Stefan Steinerberger_, Aug 30 2008 *) %Y A133689 Cf. A048671. %K A133689 nonn %O A133689 2,1 %A A133689 _Leroy Quet_, Dec 31 2007 %E A133689 More terms from _Stefan Steinerberger_, Aug 30 2008