%I A080267
%S A080267 1,5,13,41,81,257,449,1313,2497,6465,11265,33665,53249,143617,269313,
%T A080267 672257,1114113,3159041,4980737,13568001,23904257,57675777,96468993,
%U A080267 275980289,424673281,1090535425,1963720705,4823482369,7784628225
%N A080267 a(n) = Sum_{d divides n} d*2^(n-n/d).
%F A080267 G.f. Sum( k*2^(k-1)*x^k/(1-2^(k-1)*x^k), k=1..infinity). - N. J. A. Sloane 
               (njas(AT)research.att.com), Jun 04 2003
%p A080267 oo := 40; s1 := add( k*2^(k-1)*x^k/(1-2^(k-1)*x^k),k=1..oo): s2 := series(s1,
               x,oo-1): s3 := seriestolist(%): A080267 := n->s3[n+1];
%Y A080267 Cf. A075900.
%Y A080267 Sequence in context: A103729 A027862 A100210 this_sequence A034735 A046717 
               A080925
%Y A080267 Adjacent sequences: A080264 A080265 A080266 this_sequence A080268 A080269 
               A080270
%K A080267 nonn
%O A080267 1,2
%A A080267 Vladeta Jovovic (vladeta(AT)eunet.rs), Feb 11 2003