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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A346966 E.g.f.: -log( 1 - log(1 - x)^2 / 2 ). 0
 1, 3, 14, 80, 559, 4599, 43665, 470196, 5666586, 75600690, 1106587008, 17636532264, 304092954138, 5640892517610, 112029356591862, 2371963759970352, 53338181764577304, 1269586152655203672, 31891196481381667008, 843109673024218773600, 23400930987874505081160 (list; graph; refs; listen; history; text; internal format)
 OFFSET 2,2 LINKS Table of n, a(n) for n=2..22. FORMULA a(n) = |Stirling1(n,2)| + (1/n) * Sum_{k=1..n-1} binomial(n,k) * |Stirling1(n-k,2)| * k * a(k). a(n) ~ (n-1)! / (1 - exp(-sqrt(2)))^n. - Vaclav Kotesovec, Jun 04 2022 MATHEMATICA nmax = 22; CoefficientList[Series[-Log[1 - Log[1 - x]^2/2], {x, 0, nmax}], x] Range[0, nmax]! // Drop[#, 2] & a[n_] := a[n] = Abs[StirlingS1[n, 2]] + (1/n) Sum[Binomial[n, k] Abs[StirlingS1[n - k, 2]] k a[k], {k, 1, n - 1}]; Table[a[n], {n, 2, 22}] CROSSREFS Cf. A000254, A003713, A346921, A346944. Sequence in context: A202474 A347001 A354325 * A256336 A256338 A256331 Adjacent sequences: A346963 A346964 A346965 * A346967 A346968 A346969 KEYWORD nonn AUTHOR Ilya Gutkovskiy, Aug 09 2021 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.

Last modified October 2 22:30 EDT 2023. Contains 365841 sequences. (Running on oeis4.)