Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
"game" - to calculate 1.00...001 ^^ 0.5 = ?
#23
Oh Mathematica I can do
Code:
CarlemanMatrix[series:SeriesData[x_, x0_, _, _, n_, 1]] :=
  Table[D[Normal[series]^j, {x, k}]/k! /. {x -> x0}, {j, 0, n}, {k, 0, n}];
RegularIterate[series:SeriesData[x_, x0_, _, _, n_, 1], t_] :=
  SeriesData[x, x0, MatrixPower[CarlemanMatrix[series], t][[2]], 0, n, 1];

Then you can do regular tetration with this code:
Code:
tet = c + Normal[RegularIterate[Series[c^((x + c)/c) - c, {x, 0, 3}], y]]/.x->(1-c);
tet /. {c -> 2, y -> 0.5}
which would calculate .
Reply


Messages In This Thread
RE: "game" - to calculate 1.00...001 ^^ 0.5 = ? - by andydude - 05/01/2009, 08:34 PM



Users browsing this thread: 1 Guest(s)