cp's OEIS Frontend

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.

A262870 Sum of the squarefree numbers appearing among the larger parts of the partitions of n into two parts.

This page as a plain text file.
%I A262870 #36 Feb 11 2018 03:03:17
%S A262870 0,1,2,5,3,8,11,18,18,18,23,34,28,41,48,63,63,80,80,99,89,110,121,144,
%T A262870 144,144,157,157,143,172,187,218,218,251,268,303,303,340,359,398,398,
%U A262870 439,460,503,481,481,504,551,551,551,551,602,576,629,629,684,684
%N A262870 Sum of the squarefree numbers appearing among the larger parts of the partitions of n into two parts.
%H A262870 <a href="/index/Par#part">Index entries for sequences related to partitions</a>
%F A262870 a(n) = Sum_{i=1..floor(n/2)} (n-i) * mu(n-i)^2, where mu is the Möebius function (A008683).
%F A262870 a(n) = A262992(n) - A262871(n).
%e A262870 a(4)=5; there are two partitions of 4 into two parts: (3,1) and (2,2). The sum of the larger squarefree parts is 3+2=5, thus a(4)=5.
%e A262870 a(5)=3; there are two partitions of 5 into two parts: (4,1) and (3,2). Of the larger parts, 3 is the only squarefree part, so a(5)=3.
%p A262870 with(numtheory): A262870:=n->add((n-i)*mobius(n-i)^2, i=1..floor(n/2)): seq(A262870(n), n=1..100);
%t A262870 Table[Sum[(n - i) MoebiusMu[n - i]^2, {i, Floor[n/2]}], {n, 70}]
%o A262870 (PARI) a(n) = sum(i=1, n\2, (n-i) * moebius(n-i)^2); \\ _Michel Marcus_, Oct 04 2015
%o A262870 (PARI) a(n)=my(s); forsquarefree(k=(n+1)\2,n-1, s += k[1]); s \\ _Charles R Greathouse IV_, Jan 08 2018
%Y A262870 Cf. A008683, A071068, A261985, A262351, A262868, A262869, A262871, A262991, A262992.
%K A262870 nonn,easy
%O A262870 1,3
%A A262870 _Wesley Ivan Hurt_, Oct 03 2015