login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A335636 Expansion of e.g.f. Product_{k>0} 1/(1 - tan(x)^k / k). 4
1, 1, 3, 13, 80, 560, 4972, 48060, 552632, 6813560, 95846728, 1435488184, 23855755040, 419889384096, 8048166402304, 162616435301824, 3531256457687168, 80497793591765120, 1953028123616286592, 49561115477458450560, 1328614915154244276224, 37134707962379971432448 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

Vaclav Kotesovec, Table of n, a(n) for n = 0..430

FORMULA

E.g.f.: exp( Sum_{i>0} Sum_{j>0} tan(x)^(i*j)/(i*j^i) ).

Conjecture: a(n) ~ A080130 * n * 2^(2*n+2) * n! / Pi^(n+2). - Vaclav Kotesovec, Oct 04 2020

MATHEMATICA

max = 21; Range[0, max]! * CoefficientList[Series[Product[1/(1 - Tan[x]^k/k), {k, 1, max}], {x, 0, max}], x] (* Amiram Eldar, Oct 03 2020 *)

PROG

(PARI) N=40; x='x+O('x^N); Vec(serlaplace(1/prod(k=1, N, 1-tan(x)^k/k)))

(PARI) N=40; x='x+O('x^N); Vec(serlaplace(exp(sum(i=1, N, sum(j=1, N\i, tan(x)^(i*j)/(i*j^i))))))

CROSSREFS

Cf. A000182, A007841, A335627, A335635, A335638, A335643.

Sequence in context: A090364 A112935 A258377 * A201795 A308521 A183278

Adjacent sequences:  A335633 A335634 A335635 * A335637 A335638 A335639

KEYWORD

nonn

AUTHOR

Seiichi Manyama, Oct 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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 16 21:59 EDT 2021. Contains 343952 sequences. (Running on oeis4.)