|
|
A294628
|
|
a(n) = 8*(sigma(n) - n + (1/2)).
|
|
3
|
|
|
4, 12, 12, 28, 12, 52, 12, 60, 36, 68, 12, 132, 12, 84, 76, 124, 12, 172, 12, 180, 92, 116, 12, 292, 52, 132, 108, 228, 12, 340, 12, 252, 124, 164, 108, 444, 12, 180, 140, 404, 12, 436, 12, 324, 268, 212, 12, 612, 68, 348, 172, 372, 12, 532, 140, 516, 188, 260, 12, 868, 12, 276
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
with(numtheory): seq(sigma(8*n-1)/8, n=1..10^3); # Muniru A Asiru, Mar 04 2018
|
|
MATHEMATICA
|
a[n_] := 8 (DivisorSigma[1, n] - n) + 4; Array[a, 62] (* Robert G. Wilson v, Dec 12 2017 *)
|
|
PROG
|
(GAP) List([1..10^5], n->8*(Sigma(n)-n+(1/2))); # Muniru A Asiru, Mar 04 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|