|
|
A001876
|
|
Number of divisors of n of form 5k+1; a(0)=0.
|
|
17
|
|
|
0, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 2, 1, 1, 1, 2, 1, 2, 1, 1, 2, 2, 1, 2, 1, 2, 1, 1, 1, 2, 2, 2, 2, 1, 1, 3, 1, 1, 1, 1, 2, 3, 1, 2, 1, 2, 1, 3, 1, 1, 2, 2, 1, 2, 2, 2, 1, 1, 1, 2, 2, 2, 2, 2, 1, 4, 1, 1, 1, 1, 2, 3, 1, 1, 1, 2, 2, 3, 1, 2, 2, 2, 1, 3, 1, 2, 1
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,7
|
|
LINKS
|
|
|
FORMULA
|
G.f.: Sum_{n>=0} x^(5n+1)/(1-x^(5n+1)).
G.f.: Sum_{n>=1} x^n/(1-x^(5*n)). - Joerg Arndt, Jan 30 2011
|
|
MATHEMATICA
|
CoefficientList[ Series[ Together[ Sum[ x^n/(1 - x^(5n)), {n, 110}]], {x, 0, 110}], x] (* Robert G. Wilson v, Jan 31 2011 *)
|
|
PROG
|
(PARI) a(n) = if(n==0, 0, sumdiv(n, d, (d % 5) == 1)); \\ Michel Marcus, Feb 25 2021
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|