A317349
G.f. A(x) satisfies: Sum_{n>=0} ( 1/A(x) - (1-x)^n )^n = 1.
Original entry on oeis.org
1, 1, 2, 7, 42, 372, 4269, 59047, 946557, 17175289, 347208299, 7730688884, 187911183701, 4951155672353, 140575561645293, 4279249948000903, 139050095246322895, 4804391579357016747, 175902340755219278039, 6803436418471129704925, 277202774381386656583959, 11868116969794805874111831
Offset: 0
G.f.: A(x) = 1 + x + 2*x^2 + 7*x^3 + 42*x^4 + 372*x^5 + 4269*x^6 + 59047*x^7 + 946557*x^8 + 17175289*x^9 + 347208299*x^10 + ...
such that
1 = 1 + (1/A(x) - (1-x)) + (1/A(x) - (1-x)^2)^2 + (1/A(x) - (1-x)^3)^3 + (1/A(x) - (1-x)^4)^4 + (1/A(x) - (1-x)^5)^5 + (1/A(x) - (1-x)^6)^6 + (1/A(x) - (1-x)^7)^7 + (1/A(x) - (1-x)^8)^8 + ...
Also,
A(x) = 1 + (1/A(x) - (1-x)^2) + (1/A(x) - (1-x)^3)^2 + (1/A(x) - (1-x)^4)^3 + (1/A(x) - (1-x)^5)^4 + (1/A(x) - (1-x)^6)^5 + (1/A(x) - (1-x)^7)^6 + (1/A(x) - (1-x)^8)^7 + (1/A(x) - (1-x)^9)^8 + ...
-
{a(n) = my(A=[1]); for(i=1,n, A=concat(A,0); A[#A] = Vec( sum(m=0,#A, ( 1/Ser(A) - (1-x)^(m+1) )^m ) )[#A]/2 ); A[n+1]}
for(n=0,25, print1(a(n),", "))
A317803
G.f. A(x) satisfies: Sum_{n>=0} ( 1/A(x) - 1/(1+x)^(4*n) )^n = 1.
Original entry on oeis.org
1, 4, 22, 308, 7877, 287224, 13293116, 735955720, 47105160785, 3410314286768, 275071315285416, 24442342714268592, 2371821148074889444, 249559207019813962752, 28303003280888905543584, 3442273720243525242224992, 446977352681757476329452018, 61724119095080041604018873868, 9033234491867095630258647812994, 1396682556807057529868101744945708, 227509260041431637641628131782970335
Offset: 0
G.f.: A(x) = 1 + 4*x + 22*x^2 + 308*x^3 + 7877*x^4 + 287224*x^5 + 13293116*x^6 + 735955720*x^7 + 47105160785*x^8 + 3410314286768*x^9 + 275071315285416*x^10 + ...
such that
1 = 1 + (1/A(x) - 1/(1+x)^4) + (1/A(x) - 1/(1+x)^8)^2 + (1/A(x) - 1/(1+x)^12)^3 + (1/A(x) - 1/(1+x)^16)^4 + (1/A(x) - 1/(1+x)^20)^5 + (1/A(x) - 1/(1+x)^24)^6 + (1/A(x) - 1/(1+x)^28)^7 + (1/A(x) - 1/(1+x)^32)^8 + ...
Also,
A(x) = 1 + (1/A(x) - 1/(1+x)^8) + (1/A(x) - 1/(1+x)^12)^2 + (1/A(x) - 1/(1+x)^16)^3 + (1/A(x) - 1/(1+x)^20)^4 + (1/A(x) - 1/(1+x)^24)^5 + (1/A(x) - 1/(1+x)^28)^6 + (1/A(x) - 1/(1+x)^32)^7 + (1/A(x) - 1/(1+x)^36)^8 + ...
RELATED SERIES.
(1) The series B(x,1) = Sum_{n>=0} ( 1/A(x) - 1/(1+x)^(4*n+1) )^n begins
B(x,1) = 1 + x + 4*x^2 + 58*x^3 + 1482*x^4 + 53953*x^5 + 2496149*x^6 + 138245508*x^7 + 8853719964*x^8 + 641386920943*x^9 + 51762649442019*x^10 + ...
where B(x,1) = Sum_{n>=0} ( 1/A(x) - 1/(1+x)^(4*n+4) )^n / (1+x)^(3*n+3).
(2) The series B(x,2) = Sum_{n>=0} ( 1/A(x) - 1/(1+x)^(4*n+2) )^n begins
B(x,2) = 1 + 2*x + 9*x^2 + 128*x^3 + 3270*x^4 + 119002*x^5 + 5502295*x^6 + 304531768*x^7 + 19491119849*x^8 + 1411222743454*x^9 + 113839065423087*x^10 + ...
where B(x,2) = Sum_{n>=0} ( 1/A(x) - 1/(1+x)^(4*n+4) )^n / (1+x)^(2*n+2).
(3) The series B(x,3) = Sum_{n>=0} ( 1/A(x) - 1/(1+x)^(4*n+3) )^n begins
B(x,3) = 1 + 3*x + 15*x^2 + 211*x^3 + 5392*x^4 + 196341*x^5 + 9079538*x^6 + 502467023*x^7 + 32153605481*x^8 + 2327561975059*x^9 + 187722580703289*x^10 + ...
where B(x,3) = Sum_{n>=0} ( 1/A(x) - 1/(1+x)^(4*n+4) )^n / (1+x)^(n+1).
-
{a(n) = my(A=[1]); for(i=1, n, A=concat(A, 0); A[#A] = Vec( sum(m=0, #A, ( 1/Ser(A) - 1/(1+x +x*O(x^#A))^(4*m+4) )^m ) )[#A]/2 ); A[n+1]}
for(n=0, 25, print1(a(n), ", "))
A317666
G.f. A(x) satisfies: Sum_{n>=0} ( 1/A(x) - (1-x)^(2*n) )^n = 1.
Original entry on oeis.org
1, 2, 7, 48, 590, 10602, 244457, 6767792, 216875258, 7863473864, 317632851912, 14132208327052, 686514289288897, 36154193924315170, 2051928741855927465, 124870207134047889232, 8112089716821244526285, 560396754826502247713090, 41024663835523296400398275, 3172738829903313189522259140, 258493327059457440608140711531
Offset: 0
G.f.: A(x) = 1 + 2*x + 7*x^2 + 48*x^3 + 590*x^4 + 10602*x^5 + 244457*x^6 + 6767792*x^7 + 216875258*x^8 + 7863473864*x^9 + 317632851912*x^10 + ...
such that
1 = 1 + (1/A(x) - (1-x)^2) + (1/A(x) - (1-x)^4)^2 + (1/A(x) - (1-x)^6)^3 + (1/A(x) - (1-x)^8)^4 + (1/A(x) - (1-x)^10)^5 + (1/A(x) - (1-x)^12)^6 + (1/A(x) - (1-x)^14)^7 + (1/A(x) - (1-x)^16)^8 + ...
Also,
A(x) = 1 + (1/A(x) - (1-x)^4) + (1/A(x) - (1-x)^6)^2 + (1/A(x) - (1-x)^8)^3 + (1/A(x) - (1-x)^10)^4 + (1/A(x) - (1-x)^12)^5 + (1/A(x) - (1-x)^14)^6 + (1/A(x) - (1-x)^16)^7 + (1/A(x) - (1-x)^18)^8 + ...
RELATED SERIES.
The related series B(x) = Sum_{n>=0} ( 1/A(x) - (1-x)^(2*n+1) )^n begins
B(x) = 1 + x + 3*x^2 + 20*x^3 + 245*x^4 + 4394*x^5 + 101203*x^6 + 2800620*x^7 + 89739208*x^8 + 3253949840*x^9 + 131451064170*x^10 + ...
restated,
B(x) = 1 + (1/A(x) - (1-x)^3) + (1/A(x) - (1-x)^5)^2 + (1/A(x) - (1-x)^7)^3 + (1/A(x) - (1-x)^9)^4 + (1/A(x) - (1-x)^11)^5 + (1/A(x) - (1-x)^13)^6 + (1/A(x) - (1-x)^15)^7 + (1/A(x) - (1-x)^17)^8 + ...
which also equals
B(x) = (1-x) + (1/A(x) - (1-x)^4)*(1-x)^2 + (1/A(x) - (1-x)^6)^2*(1-x)^3 + (1/A(x) - (1-x)^8)^3*(1-x)^4 + (1/A(x) - (1-x)^10)^4*(1-x)^5 + (1/A(x) - (1-x)^12)^5*(1-x)^6 + (1/A(x) - (1-x)^14)^6*(1-x)^7 + (1/A(x) - (1-x)^16)^7*(1-x)^8 + (1/A(x) - (1-x)^18)^8*(1-x)^9 + ...
Compare the above to
1 = (1-x)^2 + (1/A(x) - (1-x)^4)*(1-x)^4 + (1/A(x) - (1-x)^6)^2*(1-x)^6 + (1/A(x) - (1-x)^8)^3*(1-x)^8 + (1/A(x) - (1-x)^10)^4*(1-x)^10 + (1/A(x) - (1-x)^12)^5*(1-x)^12 + (1/A(x) - (1-x)^14)^6*(1-x)^14 + (1/A(x) - (1-x)^16)^7*(1-x)^16 + (1/A(x) - (1-x)^18)^8*(1-x)^18 + ...
-
{a(n) = my(A=[1]); for(i=1, n, A=concat(A, 0); A[#A] = Vec( sum(m=0, #A, ( 1/Ser(A) - (1-x)^(2*m+2) )^m ) )[#A]/2 ); A[n+1]}
for(n=0, 25, print1(a(n), ", "))
A317667
G.f. A(x) satisfies: Sum_{n>=0} ( 1/A(x) - (1-x)^(3*n) )^n = 1.
Original entry on oeis.org
1, 3, 15, 154, 2865, 77532, 2684504, 111490839, 5357828286, 291299582266, 17643988446921, 1177175235308976, 85754781272021397, 6772714984220704506, 576470959628636447748, 52613628461306161087953, 5126338275850981999654524, 531146069930403178373329794, 58319563977901655667747310206, 6764879932357508722274792757285
Offset: 0
G.f.: A(x) = 1 + 3*x + 15*x^2 + 154*x^3 + 2865*x^4 + 77532*x^5 + 2684504*x^6 + 111490839*x^7 + 5357828286*x^8 + 291299582266*x^9 + 17643988446921*x^10 + ...
such that
1 = 1 + (1/A(x) - (1-x)^3) + (1/A(x) - (1-x)^6)^2 + (1/A(x) - (1-x)^9)^3 + (1/A(x) - (1-x)^12)^4 + (1/A(x) - (1-x)^15)^5 + (1/A(x) - (1-x)^18)^6 + (1/A(x) - (1-x)^21)^7 + (1/A(x) - (1-x)^24)^8 + ...
Also,
A(x) = 1 + (1/A(x) - (1-x)^6) + (1/A(x) - (1-x)^9)^2 + (1/A(x) - (1-x)^12)^3 + (1/A(x) - (1-x)^15)^4 + (1/A(x) - (1-x)^18)^5 + (1/A(x) - (1-x)^21)^6 + (1/A(x) - (1-x)^24)^7 + (1/A(x) - (1-x)^27)^8 + ...
RELATED SERIES.
(1) The series B(x) = Sum_{n>=0} ( 1/A(x) - (1-x)^(3*n+1) )^n begins
B(x) = 1 + x + 4*x^2 + 40*x^3 + 743*x^4 + 20073*x^5 + 694477*x^6 + 28841790*x^7 + 1386441234*x^8 + 75408643207*x^9 + 4569235921823*x^10 + ...
restated,
B(x) = 1 + (1/A(x) - (1-x)^4) + (1/A(x) - (1-x)^7)^2 + (1/A(x) - (1-x)^10)^3 + (1/A(x) - (1-x)^13)^4 + (1/A(x) - (1-x)^16)^5 + (1/A(x) - (1-x)^19)^6 + (1/A(x) - (1-x)^22)^7 + (1/A(x) - (1-x)^25)^8 + ...
which can also be written
B(x) = (1-x)^2 + (1/A(x) - (1-x)^6)*(1-x)^4 + (1/A(x) - (1-x)^9)^2*(1-x)^6 + (1/A(x) - (1-x)^12)^3*(1-x)^8 + (1/A(x) - (1-x)^15)^4*(1-x)^10 + (1/A(x) - (1-x)^18)^5*(1-x)^12 + (1/A(x) - (1-x)^21)^6*(1-x)^14 + (1/A(x) - (1-x)^24)^7*(1-x)^16 + (1/A(x) - (1-x)^27)^8*(1-x)^18 + ...
...
(2) The series C(x) = Sum_{n>=0} ( 1/A(x) - (1-x)^(3*n+2) )^n begins
C(x) = 1 + 2*x + 9*x^2 + 91*x^3 + 1690*x^4 + 45661*x^5 + 1579367*x^6 + 65559850*x^7 + 3149821447*x^8 + 171233732325*x^9 + 10371022987322*x^10 + ...
restated,
C(x) = 1 + (1/A(x) - (1-x)^5) + (1/A(x) - (1-x)^8)^2 + (1/A(x) - (1-x)^11)^3 + (1/A(x) - (1-x)^14)^4 + (1/A(x) - (1-x)^17)^5 + (1/A(x) - (1-x)^20)^6 + (1/A(x) - (1-x)^23)^7 + (1/A(x) - (1-x)^26)^8 + ...
which can also be written
C(x) = (1-x) + (1/A(x) - (1-x)^6)*(1-x)^2 + (1/A(x) - (1-x)^9)^2*(1-x)^3 + (1/A(x) - (1-x)^12)^3*(1-x)^4 + (1/A(x) - (1-x)^15)^4*(1-x)^5 + (1/A(x) - (1-x)^18)^5*(1-x)^6 + (1/A(x) - (1-x)^21)^6*(1-x)^7 + (1/A(x) - (1-x)^24)^7*(1-x)^8 + (1/A(x) - (1-x)^27)^8*(1-x)^9 + ...
...
Compare the above series to
1 = (1-x)^3 + (1/A(x) - (1-x)^6)*(1-x)^6 + (1/A(x) - (1-x)^9)^2*(1-x)^9 + (1/A(x) - (1-x)^12)^3*(1-x)^12 + (1/A(x) - (1-x)^15)^4*(1-x)^15 + (1/A(x) - (1-x)^18)^5*(1-x)^18 + (1/A(x) - (1-x)^21)^6*(1-x)^21 + (1/A(x) - (1-x)^24)^7*(1-x)^24 + (1/A(x) - (1-x)^27)^8*(1-x)^27 + ...
-
{a(n) = my(A=[1]); for(i=1, n, A=concat(A, 0); A[#A] = Vec( sum(m=0, #A, ( 1/Ser(A) - (1-x)^(3*m+3) )^m ) )[#A]/2 ); A[n+1]}
for(n=0, 25, print1(a(n), ", "))
Showing 1-4 of 4 results.