• 0 Vote(s) - 0 Average
• 1
• 2
• 3
• 4
• 5
 b^b^x with base 0exp(-e), the two periodic fixed points are complex conjugate pairs. Code:/* formal period2 fixed point for generic function with slope=-1,  2-cyclic solution  */ /* gs=formalperiod2(-exp(x)+1,30)[1]; */ /* returns [series,x2term] */ \ps 31 kf(a)=log(-log(a))-1; fixedaaz(a,n) = {   if (n<>-1, n=1);  return((subst(gs,x,n*sqrt(kf(a)*6))-kf(a)-1)/log(a)); } formalperiod2(gf,n) = {   local(i,gs,savegs,zs,z,zt,x2term,m2,s2,r2);   savegs=0;   gs = x+aecoeff*x^2+O(x^4);   z = subst(gf,x,gs)-subst(gs,x,-x)+acoeff*x^2;   zs = subst(polcoeff(z,3),aecoeff,x);   zt = -polcoeff(zs,0)/polcoeff(zs,1);   savegs = x + zt*x^2;   gs=savegs;   z = subst(gf,x,gs)-subst(gs,x,-x)+acoeff*x^2;   zs = subst(polcoeff(z,2),acoeff,x);   zt = -polcoeff(zs,0)/polcoeff(zs,1);   x2term = zt;   m2 = matrix(2,2);   s2 = matrix(2,1);   forstep (i=3,n,2,     gs = savegs + aocoeff*x^i + aecoeff*x^(i+1)+O(x^(i+3));     z  = subst(gf,x,gs) - subst(gs,x,-x) + x2term*x^2;     zs = subst(polcoeff(z,i+1),aecoeff,x);     zs = subst(zs,aocoeff,0);     m2[1,1] =  polcoeff(zs,1);     zs = subst(polcoeff(z,i+1),aocoeff,x);     zs = subst(zs,aecoeff,0);     m2[1,2] =  polcoeff(zs,1);     s2[1,1] = -polcoeff(zs,0);     zs = subst(polcoeff(z,i+2),aecoeff,x);     zs = subst(zs,aocoeff,0);     m2[2,1] =  polcoeff(zs,1);     zs = subst(polcoeff(z,i+2),aocoeff,x);     zs = subst(zs,aecoeff,0);     m2[2,2] =  polcoeff(zs,1);     s2[2,1] = -polcoeff(zs,0);     r2 = matsolve(m2,s2);     savegs = savegs + r2[2,1]*x^i + r2[1,1]*x^(i+1);   );   return([savegs,x2term]); } gs = formalperiod2(-exp(x)+1,30)[1]; - Sheldon « Next Oldest | Next Newest »

 Possibly Related Threads… Thread Author Replies Views Last Post Base -1 marraco 15 17,940 07/06/2022, 09:37 AM Last Post: Catullus Challenging the concept of real tetration Daniel 2 157 07/04/2022, 03:09 PM Last Post: Daniel Complex to real tetration via Kneser Daniel 3 191 07/02/2022, 02:22 AM Last Post: Daniel Real and complex tetration Daniel 3 226 06/22/2022, 11:16 PM Last Post: tommy1729 I thought I'd take a crack at base = 1/2 JmsNxn 9 1,916 06/20/2022, 08:28 AM Last Post: Catullus Ueda - Extension of tetration to real and complex heights MphLee 4 1,224 05/08/2022, 11:48 PM Last Post: JmsNxn A compilation of graphs for the periodic real valued tetrations JmsNxn 1 914 09/09/2021, 04:37 AM Last Post: JmsNxn Constructing real tetration solutions Daniel 4 7,082 12/24/2019, 12:10 AM Last Post: sheldonison Merged fixpoints of 2 iterates ? Asymptotic ? [2019] tommy1729 1 4,030 09/10/2019, 11:28 AM Last Post: sheldonison Complex Tetration, to base exp(1/e) Ember Edison 7 11,743 08/14/2019, 09:15 AM Last Post: sheldonison

Users browsing this thread: 1 Guest(s)