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 A337548 #10 Nov 23 2020 08:25:45 %S A337548 1,0,1,0,0,1,0,2,1,0,2,1,0,4,1,6,4,1,6,6,1,12,6,1,18,8,25,24,8,25,30, %T A337548 10,49,42,10,73,48,12,121,60,132,145,72,134,217,84,254,265,96,376,361, %U A337548 114,616,433,126,858,553,864,1218,649,882,1580,817,1620,2180,937 %N A337548 Number of compositions (ordered partitions) of n into distinct parts congruent to 2 mod 3. %H A337548 <a href="/index/Com#comp">Index entries for sequences related to compositions</a> %F A337548 G.f.: Sum_{k>=0} k! * x^(k*(3*k + 1)/2) / Product_{j=1..k} (1 - x^(3*j)). %e A337548 a(15) = 6 because we have [8, 5, 2], [8, 2, 5], [5, 8, 2], [5, 2, 8], [2, 8, 5] and [2, 5, 8]. %t A337548 nmax = 65; CoefficientList[Series[Sum[k! x^(k (3 k + 1)/2)/Product[1 - x^(3 j), {j, 1, k}], {k, 0, nmax}], {x, 0, nmax}], x] %Y A337548 Cf. A000931, A016789, A032020, A032021, A035386, A262928, A337547, A339059, A339060. %K A337548 nonn %O A337548 0,8 %A A337548 _Ilya Gutkovskiy_, Nov 22 2020