The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A138316 Numerators of the squarefree totient analogs of the harmonic numbers F_n. 6
 1, 2, 5, 5, 11, 13, 41, 41, 41, 11, 113, 113, 77, 241, 497, 497, 1009, 1009, 3067, 3067, 3127, 3199, 35549, 35549, 35549, 36209, 36209, 36209, 255443, 262373, 264221, 264221, 266993, 135229, 17048, 17048, 22859, 69347, 139849, 139849, 70271, 35713 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS F_n-H_n approaches a constant, 'kappa', conjectured to be equivalent to the difference of B_3-gamma, where B_3 is Mertens' 3rd constant and gamma is Euler's constant. LINKS G. C. Greubel, Table of n, a(n) for n = 1..10000 Dick Boland, An Analog of the Harmonic Numbers Over the Squarefree Integers FORMULA a(n) = numerator[sum(k=1 to n)mu^2(k)/phi(k)] where mu(k) is the Mobius function and phi(k) is Euler's Totient function. EXAMPLE Numerators of F_n, e.g., F_1 = (1/1), F_2 = (1/1 + 1/1), ... F_11 = (1/1 + 1/1 + 1/2 + 0 + 1/4 + 1/2 + 1/6 + 0 + 0 + 1/4 + 1/10). MATHEMATICA Table[Numerator[Sum[MoebiusMu[k]^2/EulerPhi[k], {k, 1, n}]], {n, 1, 60}] PROG (PARI) a(n) = numerator(sum(k=1, n, if (issquarefree(k), 1/eulerphi(k)))); \\ Michel Marcus, Aug 28 2018 CROSSREFS Cf. A138312, A138313, A138312, A138317, A138320, A138321, A083343, A001620. Sequence in context: A273041 A274108 A368616 * A183719 A239340 A124201 Adjacent sequences: A138313 A138314 A138315 * A138317 A138318 A138319 KEYWORD frac,nonn AUTHOR Dick Boland (abstract(AT)imathination.org), Mar 13 2008, Mar 27 2008 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified June 14 23:20 EDT 2024. Contains 373401 sequences. (Running on oeis4.)