Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A329891
a(0) = 0, a(1) = 1, for n > 1, a(n) = 2^n - (sigma((2^n)-1) - sigma((2^(n-1))-1)).
4
0, 1, 1, 4, 0, 24, -8, 104, -48, 352, 80, 1424, -2480, 8736, 2048, 16384, -7008, 111456, -80384, 473600, -427008, 1630976, 750592, 5731232, -12709664, 36894720, 12300416, 68246368, -38345568, 459223232, -401666240, 2015330304, -862152384, 5535523520, 4631692288, 21015756800, -61319782400, 165674113600, 46426506688, 279934140416, -484569911296
OFFSET
0,4
FORMULA
a(0) = 0; for n >= 1, a(n) = A323244(2^n) - A323244(2^(n-1)) = 2^n - A329890(n).
a(n) = A329644(2^n).
PROG
(PARI) A329891(n) = if(n<=1, n, (2^n - sigma((2^n)-1)) + sigma((2^(n-1))-1));
KEYWORD
sign
AUTHOR
Antti Karttunen, Nov 23 2019
STATUS
approved