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 A077139 #9 Nov 17 2018 21:54:21 %S A077139 1,2,6,6,30,5,35,280,2520,252,2772,231,3003,858,1430,5720,97240, %T A077139 437580,8314020,415701,969969,176358,4056234,2704156,67603900,2600150, %U A077139 70204050,10029150,290845350,9694845,300540195,9617286240,35263382880,1037158320 %N A077139 a(1) = 1, a(n) = lcm(n, a(n-1)) / gcd(n, a(n-1)). %e A077139 a(5) = 30 because given a(4) = 6: lcm(5, 6) / gcd(5, 6) = 30 / 1 = 30. %t A077139 k = 1; Print[k]; Do[k = LCM[n, k] / GCD[n, k]; Print[k], {n, 2, 30}] (* _Ryan Propper_, Jun 19 2005 *) %t A077139 nxt[{n_,a_}]:={n+1,LCM[n+1,a]/GCD[n+1,a]}; Transpose[NestList[nxt,{1,1},40]] [[2]] (* _Harvey P. Dale_, Mar 07 2013 *) %Y A077139 Essentially a duplicate of A008339, which is the main entry for this sequence. %K A077139 nonn %O A077139 1,2 %A A077139 _Amarnath Murthy_, Oct 30 2002 %E A077139 Corrected and extended by _Ryan Propper_, Jun 19 2005