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 A112812 #5 Oct 19 2017 03:14:59 %S A112812 5,3,9,2,1,3,1,2,6,9,2,5,5,9,3,3,3,5,4,7,12,5,5,10,1,4,31,6,7,20,9,9, %T A112812 9,27,29,17,5,7,35,6,1,18,2,14,29,29,29,20,2,14,6,19,4,30,8,27,6,2,8, %U A112812 11,4,4,19,18,5,14,18,26,11,72,10,19,6,11,22,11,33,6,5,22,4,7,99,97,2,44,9 %N A112812 a(n) is length of n-th run in A110566. %t A112812 f[n_] := LCM @@ Range[n]/Denominator[HarmonicNumber[n]]; Length /@ Split[Table[f[n], {n, 1220}]] %Y A112812 Cf. A110566, A112811. %K A112812 nonn %O A112812 1,1 %A A112812 _Robert G. Wilson v_, Sep 20 2005 %E A112812 Edited by _Don Reble_, Nov 08 2005 %E A112812 Definition clarified by _Omar E. Pol_, Dec 26 2008