login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A346758 a(n) = Sum_{d|n} mu(n/d) * floor(d^2/4). 1
0, 1, 2, 3, 6, 6, 12, 12, 18, 18, 30, 24, 42, 36, 48, 48, 72, 54, 90, 72, 96, 90, 132, 96, 150, 126, 162, 144, 210, 144, 240, 192, 240, 216, 288, 216, 342, 270, 336, 288, 420, 288, 462, 360, 432, 396, 552, 384, 588, 450, 576, 504, 702, 486, 720, 576, 720, 630, 870, 576, 930 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

COMMENTS

Moebius transform of quarter-squares (A002620).

LINKS

Table of n, a(n) for n=1..61.

FORMULA

G.f.: Sum_{k>=1} mu(k) * x^(2*k) / ((1 + x^k) * (1 - x^k)^3).

a(n) = J_2(n) / 4 for n >= 3, where J_() is the Jordan function.

MATHEMATICA

Table[Sum[MoebiusMu[n/d] Floor[d^2/4], {d, Divisors[n]}], {n, 1, 61}]

nmax = 61; CoefficientList[Series[Sum[MoebiusMu[k] x^(2 k)/((1 + x^k) (1 - x^k)^3), {k, 1, nmax}], {x, 0, nmax}], x] // Rest

PROG

(PARI) a(n) = sumdiv(n, d, moebius(n/d)*(d^2\4)); \\ Michel Marcus, Aug 03 2021

CROSSREFS

Cf. A002620, A007434, A023022, A346759.

Sequence in context: A119319 A069808 A131259 * A143177 A129648 A129649

Adjacent sequences:  A346755 A346756 A346757 * A346759 A346760 A346761

KEYWORD

nonn

AUTHOR

Ilya Gutkovskiy, Aug 02 2021

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 21 15:18 EDT 2021. Contains 348155 sequences. (Running on oeis4.)