login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Sum_{d|n, d odd} d*2^(n/d).
3

%I #5 Aug 31 2024 15:15:32

%S 0,2,4,14,16,42,76,142,256,554,1044,2070,4144,8218,16412,32934,65536,

%T 131106,262372,524326,1048656,2097634,4194348,8388654,16777984,

%U 33554642,67108916,134219390,268435568,536870970,1073745276,2147483710

%N Sum_{d|n, d odd} d*2^(n/d).

%t f[n_]:=With[{od=Select[Divisors[n],OddQ]},Total[od 2^(n/od)]]; Join[{0}, Array[f, 40]] (* _Harvey P. Dale_, Aug 31 2024 *)

%Y Cf. A054598-A054601, A000016, A000031.

%K nonn

%O 0,2

%A _N. J. A. Sloane_, Apr 16 2000