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 A015754 #19 May 18 2020 19:22:28 %S A015754 1,1,1,2,2,3,4,4,5,7,8,10,12,14,18,22,25,30,36,42,50,58,67,79,92,106, %T A015754 123,142,164,189,217,248,284,325,370,421,479,543,616,698,788,890,1005, %U A015754 1131,1273,1432,1606,1802,2020,2259,2527,2824,3150,3514,3916,4358,4849 %N A015754 Number of partitions of n into distinct parts, none being 7. %H A015754 Vincenzo Librandi, <a href="/A015754/b015754.txt">Table of n, a(n) for n = 0..1000</a> %F A015754 a(n) = A015742(n+7). - _Michel Marcus_, Feb 20 2014 %t A015754 CoefficientList[Series[Product[1+q^n, {n, 1, 60}]/(1+q^7), {q, 0, 60}], q] %t A015754 Table[Count[Select[IntegerPartitions[n], DeleteDuplicates[#] == # &], x_ /; ! MemberQ[x, 7]], {n, 0, 56}] (* _Robert Price_, May 18 2020 *) %Y A015754 Cf. A025147, A015744, A015745, A015746, A015750, A015753, A015755. %K A015754 nonn %O A015754 0,4 %A A015754 _Clark Kimberling_ %E A015754 Corrected and extended by _Dean Hickerson_, Oct 10 2001