|
|
A005450
|
|
Numerator of (1+Gamma[n])/n.
|
|
2
|
|
|
2, 1, 1, 7, 5, 121, 103, 5041, 40321, 362881, 329891, 39916801, 36846277, 6227020801, 87178291201, 1307674368001, 1230752346353, 355687428096001, 336967037143579, 121645100408832001, 2432902008176640001
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Table of n, a(n) for n=1..21.
Achilleas Sinefakopoulos, Problem 10578 (Submitted solution.)
H. S. Wilf, Problem 10578, Amer. Math. Monthly, 104 (1997), 270.
|
|
FORMULA
|
Define b(n) = ( (n-1)*(n^2-3*n+1)*b(n-1) - (n-2)^3*b(n-2) )/(n*(n-3)); b(2) = b(3) = 1; sequence gives numerators of b(n) since b(n)=(1+Gamma[n])/n. - Joseph Biberstine (jrbibers(AT)indiana.edu), Sep 12 2006
|
|
MATHEMATICA
|
Table[Numerator[(1 + Gamma[n])/n], {n, 1, 80}] (* Joseph Biberstine (jrbibers(AT)indiana.edu), Sep 12 2006 *)
|
|
CROSSREFS
|
Cf. A005451 (denominators).
Sequence in context: A220725 A333142 A196832 * A039760 A156882 A266309
Adjacent sequences: A005447 A005448 A005449 * A005451 A005452 A005453
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
EXTENSIONS
|
Better description from Joseph Biberstine (jrbibers(AT)indiana.edu), Sep 12 2006
|
|
STATUS
|
approved
|
|
|
|