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 A305632 #5 Jun 08 2018 13:53:38 %S A305632 1,1,0,1,2,2,1,2,4,3,2,4,6,5,4,7,10,8,7,11,15,13,12,17,22,19,18,25,30, %T A305632 28,26,35,42,39,38,49,59,56,54,69,81,77,76,94,110,105,105,127,147,141, %U A305632 142,171,195,189,190,227,257,250,254,299,335,328,334,390,432 %N A305632 Expansion of Product_{r = 1 or not a perfect power} 1/(1 + (-x)^r). %e A305632 O.g.f.: 1/((1 - x)(1 + x^2)(1 - x^3)(1 - x^5)(1 + x^6)(1 - x^7)(1 + x^10)...). %t A305632 nn=20; %t A305632 radQ[n_]:=Or[n==1,GCD@@FactorInteger[n][[All,2]]==1]; %t A305632 ser=Product[1/(1+(-x)^p),{p,Select[Range[nn],radQ]}]; %t A305632 Table[SeriesCoefficient[ser,{x,0,n}],{n,0,nn}] %Y A305632 Cf. A000607, A001597, A005117, A007916, A048165, A081362, A091050, A280954, A303707, A304779, A304817, A305614, A305630-A305635. %K A305632 nonn %O A305632 0,5 %A A305632 _Gus Wiseman_, Jun 07 2018