|
|
A069947
|
|
Denominator of Sum_{k=1..n} k/phi(k).
|
|
2
|
|
|
1, 1, 2, 2, 4, 4, 12, 12, 12, 12, 60, 60, 10, 30, 120, 120, 240, 240, 720, 720, 720, 720, 7920, 7920, 7920, 7920, 7920, 7920, 55440, 55440, 11088, 11088, 55440, 55440, 55440, 55440, 18480, 55440, 55440, 55440, 55440, 55440, 55440, 11088, 11088, 11088, 255024, 255024
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
REFERENCES
|
D. S. Mitrinovic et al., Handbook of Number Theory, Kluwer, Section I.27.
|
|
LINKS
|
|
|
EXAMPLE
|
1, 3, 9/2, 13/2, 31/4, 43/4, 143/12, 167/12, 185/12, ...
|
|
MAPLE
|
map(denom, ListTools:-PartialSums([seq(n/numtheory:-phi(n), n=1..100)]));
|
|
MATHEMATICA
|
Accumulate[Table[n/EulerPhi[n], {n, 50}]]//Denominator (* Harvey P. Dale, May 24 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|