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 A352165 #8 Mar 07 2022 12:58:13 %S A352165 1,1,1,2,2,3,4,5,6,8,10,12,15,18,22,26,31,37,44,52,61,71,83,97,112, %T A352165 130,150,173,199,228,261,298,340,386,439,497,563,637,718,809,910,1023, %U A352165 1147,1286,1439,1608,1796,2003,2231,2483,2761,3065,3401,3770,4175,4619 %N A352165 Number of partitions of n into odd prime powers (1 included). %F A352165 G.f.: Product_{k>=0} 1 / (1 - x^A061345(k)). %t A352165 nmax = 55; CoefficientList[Series[Product[1/(1 - Boole[(PrimePowerQ[k] || k == 1) && OddQ[k]] x^k), {k, 1, nmax}], {x, 0, nmax}], x] %Y A352165 Cf. A000961, A023893, A023894, A061345, A099773, A134345, A280151, A352166. %K A352165 nonn %O A352165 0,4 %A A352165 _Ilya Gutkovskiy_, Mar 06 2022