|
|
A076175
|
|
Denominator of sum( i+j+k = n, (i*j)/k) i,j,k >=1.
|
|
1
|
|
|
1, 1, 1, 2, 3, 12, 15, 30, 21, 168, 126, 1260, 990, 792, 1287, 18018, 5005, 80080, 68068, 58344, 50388, 201552, 176358, 3879876, 3432198, 27457584, 24515700, 637408200, 573667380, 16062686640, 29113619535, 26466926850, 24131609775
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,4
|
|
LINKS
|
Table of n, a(n) for n=1..33.
|
|
PROG
|
(PARI) a(n)=denominator(sum(i=1, n, sum(j=1, n, sum(k=1, n, if(n-i-j-k, 0, 1)*i*j/k))))
|
|
CROSSREFS
|
Cf. A076174.
Sequence in context: A173903 A154785 A090512 * A289870 A067780 A290168
Adjacent sequences: A076172 A076173 A076174 * A076176 A076177 A076178
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
Benoit Cloitre, Nov 01 2002
|
|
STATUS
|
approved
|
|
|
|