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!)
A341728 Column 1 of A341725. 3

%I #15 Sep 04 2023 12:58:13

%S 1,6,39,324,3365,41958,610351,10146888,189775017,3943689930,

%T 90148635203,2248040395692,60731103481789,1766863166037102,

%U 55075428554246295,1831224444159278736,64692540643308320081,2419861007021854813074,95544948688075940395627

%N Column 1 of A341725.

%F From _Mélika Tebni_, Sep 04 2023: (Start)

%F a(n) = n*A005923(n-1).

%F E.g.f.: x*exp(x) / (1 - 2*sinh(x)).

%F a(n) = Sum_{k=0..n} (n-k)*binomial(n, k)*A000557(k). (End)

%p A341728 := n -> add((n-k)*binomial(n, k)add(j!*combinat[fibonacci](j+2)*Stirling2(k,j), j=0..k), k=0..n):seq(A341728(n), n=1.. 19); # _Mélika Tebni_, Sep 04 2023

%p # E.g.f. Maple program:

%p A341728 := series(x*exp(x) / (1 - 2*sinh(x)), x = 0, 20):

%p seq(n!*coeff(A341728, x, n), n = 1 .. 19); # _Mélika Tebni_, Sep 04 2023

%Y Cf. A000557, A005923, A341725, A341726, A341727.

%K nonn

%O 1,2

%A _N. J. A. Sloane_, Mar 04 2021.

%E More terms from _Mélika Tebni_, Sep 04 2023

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 March 29 05:16 EDT 2024. Contains 371264 sequences. (Running on oeis4.)