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!)
A012103 cos(arcsin(sinh(x))) = 1-1/2!*x^2-7/4!*x^4-121/6!*x^6-5167/8!*x^8... 0
1, -1, -7, -121, -5167, -410641, -51771127, -9466034761, -2365187249887, -773771636088481, -320901749327353447, -164490143309272987801, -102106049239499080993807, -75475990780239097513548721 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

Table of n, a(n) for n=0..13.

FORMULA

For n>0, a(n) = Sum_{k=1..n} Sum_{j=0..k-1} Pochhammer(-1/2,k) * binomial(2k,j)*(-1)^j*2^(1+2n-2k)*(j-k)^(2n)/k!. - Benedict W. J. Irwin, May 25 2017

MATHEMATICA

With[{nn=30}, Take[CoefficientList[Series[Cos[ArcSin[Sinh[x]]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Sep 07 2015 *)

MaxVal = 13; Join[{1}, Table[ Sum[Pochhammer[-(1/2), k] Binomial[2 k, j] (-1)^(j) 2^(1 + 2 i - 2 k) (j - k)^(2 i)/k!, {k, 1, MaxVal}, {j, 0, k - 1}], {i, 1, MaxVal}]] (* Benedict W. J. Irwin, May 25 2017 *)

CROSSREFS

Sequence in context: A012043 A316730 A211103 * A012086 A074487 A192566

Adjacent sequences:  A012100 A012101 A012102 * A012104 A012105 A012106

KEYWORD

sign

AUTHOR

Patrick Demichel (patrick.demichel(AT)hp.com)

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 21 03:13 EDT 2022. Contains 353886 sequences. (Running on oeis4.)