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.

A341153 Number of partitions of 2*n into exactly n squarefree parts.

This page as a plain text file.
%I A341153 #5 Feb 06 2021 08:53:37
%S A341153 1,1,2,2,4,5,8,9,13,16,23,27,37,44,59,70,91,107,138,162,205,240,300,
%T A341153 350,432,504,615,715,865,1003,1206,1394,1663,1918,2276,2618,3088,3544,
%U A341153 4160,4764,5566,6360,7401,8440,9779,11131,12854,14602,16803,19051,21859,24741,28303
%N A341153 Number of partitions of 2*n into exactly n squarefree parts.
%F A341153 G.f.: Product_{k>=1} 1 / (1 - mu(k+1)^2 * x^k).
%t A341153 nmax = 52; CoefficientList[Series[Product[1/(1 - MoebiusMu[k + 1]^2 x^k), {k, 1, nmax}], {x, 0, nmax}], x]
%t A341153 a[n_] := a[n] = If[n == 0, 1, Sum[Sum[d MoebiusMu[d + 1]^2, {d, Divisors[k]}] a[n - k], {k, 1, n}]/n]; Table[a[n], {n, 0, 52}]
%Y A341153 Cf. A005117, A008683, A073576, A341071, A341154.
%K A341153 nonn
%O A341153 0,3
%A A341153 _Ilya Gutkovskiy_, Feb 06 2021