The OEIS mourns the passing of
Jim Simons
and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by
the many generous donors to the OEIS Foundation
.
Hints
(Greetings from
The On-Line Encyclopedia of Integer Sequences
!)
A335983
a(n) = least k such that n < Integral_{x=1/k..1} Gamma(x) dx.
1
4, 9, 26, 70, 190, 516, 1403, 3815, 10370
(
list
;
graph
;
refs
;
listen
;
history
;
text
;
internal format
)
OFFSET
1,1
COMMENTS
Does the sequence a(n+1)/a(n) converge?
LINKS
Table of n, a(n) for n=1..9.
MATHEMATICA
t = Table[{k, NIntegrate[Gamma[t], {t, 1/k, 1}]}, {k, 1, 12500}];
f = Flatten[Table[Select[t, #[[2]] > n &, 1], {n, 1, 9}]];
Table[f[[2 k - 1]], {k, 1, 9}]
PROG
(PARI) a(n) = my(k=1); while (intnum(x=1/k, 1, gamma(x)) <= n, k++); k; \\
Michel Marcus
, Jul 04 2020
CROSSREFS
Cf.
A335985
.
Sequence in context:
A216134
A226908
A328657
*
A113682
A291064
A145855
Adjacent sequences:
A335980
A335981
A335982
*
A335984
A335985
A335986
KEYWORD
nonn
,
more
AUTHOR
Clark Kimberling
, Jul 03 2020
STATUS
approved
Lookup
|
Welcome
|
Wiki
|
Register
|
Music
|
Plot 2
|
Demos
|
Index
|
Browse
|
More
|
WebCam
Contribute new seq. or comment
|
Format
|
Style Sheet
|
Transforms
|
Superseeker
|
Recents
The OEIS Community
| Maintained by
The OEIS Foundation Inc.
License Agreements, Terms of Use, Privacy Policy.
.
Last modified May 13 21:51 EDT 2024. Contains 372523 sequences. (Running on oeis4.)