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 A300548 #17 Nov 27 2024 16:00:58 %S A300548 1,-1,0,-2,0,-2,0,-2,0,-5,1,-2,1,-2,0,-14,0,-2,1,-2,0,-18,0,-2,0,-7,1, %T A300548 -23,0,-2,6,-2,0,-26,1,-26,4,-2,0,-30,0,-2,6,-2,1,-286,0,-2,0,-9,7, %U A300548 -38,0,-2,8,-38,1,-42,1,-2,7,-2,0,-493,0,-44,9,-2,0,-50,10,-2,0,-2,1,-698,1,-50,12,-2,0,-239,1,-2,10,-56 %N A300548 a(n) = [x^n] Product_{d|n} 1/(1 + x^d). %H A300548 Antti Karttunen, <a href="/A300548/b300548.txt">Table of n, a(n) for n = 0..10201</a> %H A300548 <a href="/index/Par#part">Index entries for sequences related to partitions</a> %F A300548 a(n) = -2 if n is an odd prime (A065091). %t A300548 Table[SeriesCoefficient[Product[1/(1 + Boole[Mod[n, k] == 0] x^k), {k, 1, n}], {x, 0, n}], {n, 0, 85}] %o A300548 (PARI) A300548(n) = if(!n, 1, my(p=1); fordiv(n, d, p /= (1 + 'x^d)); polcoeff(Ser(p, 'x, 1+n), n)); \\ _Antti Karttunen_, Nov 27 2024 %Y A300548 Cf. A018818, A033630, A065091, A081362, A300547, A300549. %K A300548 sign %O A300548 0,4 %A A300548 _Ilya Gutkovskiy_, Mar 08 2018