|
| |
|
|
A093419
|
|
Denominators of row sums in triangle described in A093412.
|
|
4
| |
|
|
1, 1, 3, 6, 5, 10, 35, 140, 126, 1260, 1155, 13860, 12870, 12012, 45045, 360360, 340340, 2042040, 1939938, 369512, 117572, 2586584, 7436429, 178474296, 171609900, 1487285800, 1434168450, 40156716600, 38818159380, 1164544781400
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
MATHEMATICA
| Do[s = i = n; j = 1; x = i; y = j; While[x/y != 1, i--; j++; x += i; y += j; s += x/y]; Print[Denominator[s]], {n, 1, 30}] (Propper)
|
|
|
CROSSREFS
| Essentially the same as A096620.
Cf. A093412, A093413, A093414, A093415, A093417, A093418.
Sequence in context: A118413 A096620 * A160049 A007479 A076535 A095359
Adjacent sequences: A093416 A093417 A093418 * A093420 A093421 A093422
|
|
|
KEYWORD
| nonn,frac
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Mar 30 2004
|
|
|
EXTENSIONS
| Corrected and extended by Ryan Propper (rpropper(AT)stanford.edu), Aug 16 2005
|
| |
|
|
