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 A300521 #8 Mar 09 2018 08:39:19 %S A300521 1,0,-2,-3,1,1,3,0,9,8,4,-31,-12,-13,20,-13,48,-17,74,-87,8,-143,175, %T A300521 -174,349,-164,369,-651,520,-1004,1142,-1218,1652,-1739,3291,-3933, %U A300521 3546,-5743,6170,-8022,11435,-13230,17196,-18706,22958,-31884,38420,-49802,58916 %N A300521 Expansion of Product_{k>=1} (1 - x^prime(k))^prime(k). %F A300521 G.f.: Product_{k>=1} (1 - x^A000040(k))^A000040(k). %F A300521 G.f.: exp(-Sum_{k>=1} A005063(k)*x^k/k). %t A300521 nmax = 48; CoefficientList[Series[Product[(1 - x^Prime[k])^Prime[k], {k, 1, nmax}], {x, 0, nmax}], x] %t A300521 nmax = 48; CoefficientList[Series[Exp[-Sum[DivisorSum[k, Boole[PrimeQ[#]] #^2 &] x^k/k, {k, 1, nmax}]], {x, 0, nmax}], x] %Y A300521 Cf. A000040, A000607, A005063, A007441, A030009, A046675, A073592, A219224, A291647, A291696. %K A300521 sign %O A300521 0,3 %A A300521 _Ilya Gutkovskiy_, Mar 08 2018