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 A304989 #4 May 23 2018 04:16:14 %S A304989 1,0,3,2,16,10,59,32,187,90,519,152,1439,164,3525,-246,8904,-2500, %T A304989 21748,-10836,53918,-36508,131424,-115266,328703,-336608,812615, %U A304989 -957464,2046225,-2634166,5152190,-7145682,13121677,-19039178,33473773,-50395004,86035125 %N A304989 G.f.: Sum_{k>=0} A000041(k)^2 * x^k / Sum_{k>=0} A000009(k)^2 * x^k. %F A304989 a(n) ~ (-1)^n * c * d^n, where d = 1.6096199212376592810929072080593393678131347423108390218672748044914523428584..., c = 3.049014588253509415528984781833089943634060493523166258285691300445092167... %t A304989 nmax = 50; CoefficientList[Series[Sum[PartitionsP[k]^2*x^k, {k, 0, nmax}] / Sum[PartitionsQ[k]^2*x^k, {k, 0, nmax}], {x, 0, nmax}], x] %Y A304989 Cf. A000009, A000041, A001255, A054440, A304877, A304990. %K A304989 sign %O A304989 0,3 %A A304989 _Vaclav Kotesovec_, May 23 2018