|
%I #17 Jan 25 2014 01:43:46
%S 2,6,12,28,40,48,224,234,496,960,8128,47616,174592,10371840,15037440,
%T 28090368,33550336,134209536,207516672,492101632,1150402560,
%U 8589869056,59205411720,137438691328
%N Let d_1=1 < d_2 < d_3 < ... be the divisors of n; sequence lists positive numbers n such that for some k, n = 2(d_1 + ... + d_k).
%D Arie Groeneveld, Posting to Sequence Fans Mailing List, Feb 06, 2011
%o (PARI) forstep(n=2, 33550336, 2, d=divisors(n); s=0; for(j=1, numdiv(n), s=s+2*d[j]; if(s>=n, if(s==n, print1(n ", ")); next(2)))) \\ _Donovan Johnson_, Jan 24 2014
%Y Supersequence of A000396.
%Y Cf. A064510, A185584, A185960.
%K nonn,more
%O 1,1
%A _N. J. A. Sloane_, Feb 07 2011
%E a(14)-a(22) from _Donovan Johnson_, Feb 10 2011
%E a(23)-a(24) from _Donovan Johnson_, Jan 24 2014
|
