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 A064888 #7 Mar 18 2018 04:08:09
%S A064888 1,2,3,23,323,647,971,7121,6943,185147,363173,179407463,412637165,
%T A064888 20631858251,140035237,3716297449,27822060851939,2853544702763,
%U A064888 58823785801243,568431869527163,279209361758899949,4944838261875010691
%N A064888 Numerators of partial sums of 1/A051451.
%C A064888 A051451 unlike A003418 contains distinct values of lcm(1..m).
%F A064888 a(n) = Sum_{k=1..n} 1/A051451(k), where A051451 is the lcm(1...m), m is a prime or true power of prime. The sequence is convergent.
%e A064888 n=6, s(n) = 1/2 + 1/6 + 1/12 + 1/60 + 1/420 + 1/840 = 646/840 = 323/420, the numerator is a(6)=323.
%t A064888 s=Select[Range[a, b], Equal[Length[FactorInteger[ # ]], 1]&] a(m) = Apply[LCM, Table[Part[s, w], {w, 1, m}]]
%Y A064888 Cf. A003418, A051451, A064857-A064859.
%K A064888 frac,nonn
%O A064888 1,2
%A A064888 _Labos Elemer_, Oct 10 2001