login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A354425 List of k such that sign(A009277(k)) = sign(A009277(k+1)). 4
0, 2, 6, 10, 16, 22, 29, 37, 45, 54, 63, 73, 83, 93, 104, 116, 128, 140, 153, 166, 179, 193, 207, 221, 236, 251, 266, 282, 298, 314, 331, 347, 364, 382, 399, 417, 435, 454, 473, 491, 511, 530, 550, 570, 590, 610, 631, 652, 673, 694, 715, 737, 759, 781, 804, 826, 849, 872, 895, 919, 942, 966, 990 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
What is the limit of a(n) / n^(3/2) ?
LINKS
EXAMPLE
2 is in the sequence because A009277(2) = -4 and A009277(3) = -88 have the same sign.
6 is in the sequence because A009277(6) = 675776 and A009277(7) = 903834752 have the same sign.
MATHEMATICA
nmax = 500; A009277 = Table[(CoefficientList[Series[Exp[Tanh[x]^2], {x, 0, 2*nmax}], x] * Range[0, 2*nmax]!)[[k]], {k, 3, 2*nmax, 2}]; Join[{0}, Select[Range[nmax-2], A009277[[#]]*A009277[[#+1]] > 0 &]]
With[{nn=2000}, SequencePosition[Sign[Take[CoefficientList[Series[Exp[Tanh[x]^2], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]], {x_, x_}]][[;; , 1]]-1 (* Harvey P. Dale, Apr 08 2023 *)
CROSSREFS
Sequence in context: A032426 A220453 A195957 * A294013 A183575 A096184
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, May 27 2022, following a suggestion from Paul D. Hanna
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 April 22 21:00 EDT 2024. Contains 371906 sequences. (Running on oeis4.)