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!)
A032271 Shifts left under "DIJ" (bracelet, indistinct, labeled) transform, with a(1) = 1. 2
1, 1, 2, 6, 26, 153, 1159, 10787, 118990, 1514889, 21829045, 350831856, 6217711541, 120414106210, 2529280077269, 57262796466087, 1389919284470906, 36003846648705324, 991298773140316816, 28907953199669176721, 890060047425265014457, 28852689090331738589427 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

Andrew Howroyd, Table of n, a(n) for n = 1..200

MATHEMATICA

m = 22; A[_] = 0;

Do[A[x_] = Integrate[1 + (1/2)(A[x] + A[x]^2/2 - Log[1 - A[x]]) + O[x]^m, x] // Normal, {m}];

CoefficientList[A[x], x] Range[0, m]! // Rest (* Jean-Fran├žois Alcover, Sep 18 2019 *)

PROG

(PARI) DIJ(p)={(p + p^2/2 - log(1-p))/2}

seq(n)={my(p=O(x)); for(i=1, n, p=intformal(1+DIJ(p))); Vec(serlaplace(p))} \\ Andrew Howroyd, Sep 19 2018

CROSSREFS

Cf. A032272, A032273.

Sequence in context: A032187 A003659 A159602 * A205502 A107104 A141761

Adjacent sequences:  A032268 A032269 A032270 * A032272 A032273 A032274

KEYWORD

nonn,eigen

AUTHOR

Christian G. Bower

EXTENSIONS

Terms a(20) and beyond from Andrew Howroyd, Sep 19 2018

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 March 30 06:17 EDT 2020. Contains 333119 sequences. (Running on oeis4.)