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 A095944 #34 Oct 27 2023 19:41:48 %S A095944 1,3,6,11,18,28,42,61,86,119,162,217,287,375,485,622,791,998,1251, %T A095944 1558,1929,2376,2912,3552,4314,5218,6287,7548,9031,10770,12805,15180, %U A095944 17945,21158,24883,29193,34171,39909,46511,54095,62792,72749,84132,97125 %N A095944 Number of subsets S of {1,2,...,n} which contain a number that is greater than the sum of the other numbers in S. %C A095944 Convolution of A000009 and A001477. - _Vaclav Kotesovec_, Mar 12 2016 %H A095944 Alois P. Heinz, <a href="/A095944/b095944.txt">Table of n, a(n) for n = 1..10000</a> (first 500 terms from T. D. Noe) %F A095944 Second differences are A000009, partitions into distinct parts. Proof from Fred W. Helenius (fredh(AT)ix.netcom.com): Let k be the largest element (the "dictator") in S and let j be the sum of the remaining elements, so 0 <= j < k. For a given k and j, the number of subsets S is just the number of partitions j into distinct parts; call that a(j). Then b(n) = Sum_{1<=k<=n} Sum_{0<=j<k} a(j). This was independently discovered by _N. J. A. Sloane_ and proved by _Michael Reid_. %F A095944 a(n) ~ 3^(3/4) * n^(1/4) * exp(sqrt(n/3)*Pi) / Pi^2. - _Vaclav Kotesovec_, Mar 12 2016 %F A095944 G.f.: (x/(1 - x)^2)*Product_{k>=1} (1 + x^k). - _Ilya Gutkovskiy_, Jan 03 2017 %e A095944 a(3) = 6 since the subsets {1},{2},{3},{1,2},{1,3},{2,3} are the only subsets of {1,2,3} which contain a number greater than the sum of the other numbers in the set. %t A095944 r[s_, x_] := r[s,x] = 1 + Sum[r[s-i, i-1], {i, Min[x,s]}]; f[n_] := Sum[r[k-1, k-1], {k, n}]; Array[f, 50] (* _Giovanni Resta_, Mar 16 2006 *) %t A095944 Accumulate[ Accumulate[q = PartitionsQ[ Range[1, 50]]]+1] - Accumulate[q] (* _Jean-François Alcover_, Nov 14 2011 *) %Y A095944 Equals 2^n - 1 - A095941(n). %Y A095944 Column k=1 of A360634. %K A095944 nice,nonn,easy %O A095944 1,2 %A A095944 _W. Edwin Clark_, Jul 13 2004 %E A095944 More terms from _John W. Layman_, Aug 10 2004 %E A095944 More terms from _Giovanni Resta_, Mar 16 2006