A328337 The number whose binary indices are the nontrivial divisors of n (greater than 1 and less than n).
0, 0, 0, 2, 0, 6, 0, 10, 4, 18, 0, 46, 0, 66, 20, 138, 0, 294, 0, 538, 68, 1026, 0, 2222, 16, 4098, 260, 8266, 0, 16950, 0, 32906, 1028, 65538, 80, 133422, 0, 262146, 4100, 524954, 0, 1056870, 0, 2098186, 16660, 4194306, 0, 8423598, 64, 16777746, 65540
Offset: 1
Keywords
Examples
The nontrivial divisors of 18 are {2, 3, 6, 9}, so a(18) = 2^1 + 2^2 + 2^5 + 2^8 = 294.
Crossrefs
Programs
-
Mathematica
Table[Total[(2^DeleteCases[Divisors[n],1|n])/2],{n,100}]
-
Python
from sympy import divisors def A328337(n): return sum(1<<(d-1) for d in divisors(n,generator=True) if 1
Chai Wah Wu, Jul 15 2022
Comments