OFFSET
1,1
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..1000
FORMULA
r = sum{(n!^5)*p(5,n)/(5*n + 4)!, n >= 0}, where p(k,n) is defined at A248664.
EXAMPLE
r = 2.71829122423905735499923669685865...
MATHEMATICA
x = N[Sum[(Floor[n/2])!^2/n!, {n, 0, 200}], 120]
RealDigits[x][[1]] (* A248682 *)
x = N[Sum[(Floor[n/3])!^3/n!, {n, 0, 200}], 120]
RealDigits[x][[1]] (* A248683 *)
x = N[Sum[(Floor[n/4])!^4/n!, {n, 0, 200}], 120]
RealDigits[x][[1]] (* A248684 *)
x = N[Sum[(Floor[n/5])!^5/n!, {n, 0, 200}], 120]
RealDigits[x][[1]] (* A248685 *)
CROSSREFS
KEYWORD
AUTHOR
Clark Kimberling, Oct 11 2014
STATUS
approved