|
|
A120075
|
|
Row sums of triangle A120073 (denominator triangle for H atom spectrum).
|
|
6
|
|
|
4, 45, 176, 750, 1101, 4459, 6080, 13284, 16350, 46585, 33954, 109850, 92463, 142705, 198400, 432344, 255096, 761349, 500355, 824866, 925529, 2007555, 1044616, 2612500, 2158130, 3301641, 2848741
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
2,1
|
|
LINKS
|
|
|
FORMULA
|
a(n) = Sum_{k=1..n-1} A120073(n,k), for n >= 2.
|
|
MATHEMATICA
|
A120075[n_]:= Sum[Denominator[1/k^2 -1/n^2], {k, n-1}];
|
|
PROG
|
(Magma)
A120073:= func< n, k | Denominator(1/k^2 - 1/n^2) >;
(SageMath)
def A120073(n, k): return denominator(1/k^2 - 1/n^2)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|