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.
%I A304991 #6 May 23 2023 15:12:16 %S A304991 1,1,2,6,10,21,44,75,132,240,420,672,1155,1818,2970,4752,7392,11286, %T A304991 17710,26460,40128,60192,89178,130520,192150,278036,401940,577920, %U A304991 825396,1168640,1658784,2326280,3256110,4544064,6302720,8706555,12008636,16444120,22476960 %N A304991 a(n) = A000041(n) * A000009(n). %F A304991 a(n) ~ exp(Pi*(1+sqrt(2))*sqrt(n/3)) / (16*3^(3/4)*n^(7/4)). %p A304991 b:= proc(n) option remember; `if`(n=0, 1, add(b(n-j)*add( %p A304991 `if`(d::odd, d, 0), d=numtheory[divisors](j)), j=1..n)/n) %p A304991 end: %p A304991 a:= n-> b(n)*combinat[numbpart](n): %p A304991 seq(a(n), n=0..40); # _Alois P. Heinz_, May 23 2023 %t A304991 Table[PartitionsP[n]*PartitionsQ[n], {n, 0, 50}] %Y A304991 Cf. A000009, A000041, A015128. %K A304991 nonn %O A304991 0,3 %A A304991 _Vaclav Kotesovec_, May 23 2018