login
The OEIS is supported by the many generous donors to the OEIS 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
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
Sequence in context: A119319 A069808 A131259 * A143177 A129648 A129649
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 | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 24 11:15 EST 2024. Contains 370303 sequences. (Running on oeis4.)