%I #2 Mar 30 2012 18:40:52
%S 0,1,2,7,9,17,30,181,213,296,369,1802,2449,17790,46001,56448,57664,
%T 77009,95190,746935,2289093,3753007,6539606,128829523,158059067,
%U 298060788,432415361,1207300530,1953285227,43665199740,124195273633
%N Partial sums of A046878.
%C Partial sums of numerator of 1/n Sum[1/BinomialCoefficient[n-1,k], {k=0...n-1}]. The subsequence of primes in the partial sum of numerators begins: 2, 7, 17, 181, x, 3753007, 158059067.
%F a(n) = SUM[i=0..n] A046878(i) = SUM[i=0..n] numerator of SUM[k=0..i-1] (1/i) * (1/BinomialCoefficient[i-1,k] = SUM[i=0..n] numerator of (1/2^i)*SUM[k=1..i]((2^k)/k).
%Y Cf. A046878, A046825, A046879.
%K nonn
%O 0,3
%A _Jonathan Vos Post_, May 12 2010
|