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 A124444 #13 Mar 19 2018 05:41:20 %S A124444 1,1,2,3,12,5,60,35,280,63,2520,77,27720,1287,8008,6435,720720,2431, %T A124444 12252240,46189,3695120,440895,232792560,96577,1070845776,3900225, %U A124444 2974571600,5014575,80313433200,215441,2329089562800,31556720475 %N A124444 a(n) = LCM of the integers, from n/2 to n, which are coprime to n. %e A124444 The integers which are >= 9/2 and are <= 9 and which are coprime to 9 are 5, 7 and 8. So a(9) = lcm(5,7,8) = 280. %t A124444 f[n_] := LCM @@ Select[Range[Ceiling[n/2], n], GCD[ #, n] == 1 &];Table[f[n], {n, 33}] (* _Ray Chandler_, Nov 12 2006 *) %o A124444 (PARI) a(n) = lcm(select(x->(gcd(x, n)==1), vector(n\2, k, n\2+k))); \\ _Michel Marcus_, Mar 18 2018 %Y A124444 Cf. A124443. %K A124444 nonn %O A124444 1,3 %A A124444 _Leroy Quet_, Nov 01 2006 %E A124444 Extended by _Ray Chandler_, Nov 12 2006