|
%I #6 Sep 04 2014 14:18:04
%S 3,17,265,4329,16779497,4311714025,73031059689,1152921577101035753,
%T 1329227995784915873480267885077956841,
%U 95780971304118054976624684827067692545766545852041449
%N Sum of first n perfect numbers A000396, divided by 2.
%C Partial sums of A133028. [From _R. J. Mathar_, Jan 21 2009]
%F a(n) = A092336(n)/2.
%t Accumulate[(# (#+1))/2&/@Select[2^Range[90]-1,PrimeQ] ]/2 (* _Harvey P. Dale_, Sep 04 2014 *)
%Y Cf. A000396, A092336, A153474, A153475, A153476.
%K nonn
%O 1,1
%A _Omar E. Pol_, Dec 27 2008
%E More terms from _R. J. Mathar_, Jan 21 2009
| 