<rss xmlns:itunes="http://www.itunes.com/dtds/podcast-1.0.dtd" version="2.0">
  <channel>
    <title>MaplePrimes - comments on Post, Repeating Powers</title>
    <link>http://www.mapleprimes.com/posts/39897-Repeating-Powers</link>
    <language>en-us</language>
    <copyright>2026 Maplesoft, A Division of Waterloo Maple Inc.</copyright>
    <generator>Maplesoft Document System</generator>
    <lastBuildDate>Wed, 10 Jun 2026 16:17:20 GMT</lastBuildDate>
    <pubDate>Wed, 10 Jun 2026 16:17:20 GMT</pubDate>
    <itunes:subtitle />
    <itunes:summary />
    <description>The latest comments added to the Post, Repeating Powers</description>
    <image>
      <url>http://www.mapleprimes.com/images/mapleprimeswhite.jpg</url>
      <title>MaplePrimes - comments on Post, Repeating Powers</title>
      <link>http://www.mapleprimes.com/posts/39897-Repeating-Powers</link>
    </image>
    <item>
      <title>bifurcation</title>
      <link>http://www.mapleprimes.com/posts/39897-Repeating-Powers?ref=Feed:MaplePrimes:Repeating Powers:Comments#comment73144</link>
      <itunes:summary>&lt;p&gt;What you are observing is one branch of a bifurcation.&amp;nbsp; Try the following,&lt;/p&gt;
&lt;pre&gt;
f := proc(x,n) local y,z; z := 1./x; y := z; to n do y := z^y end do end proc:
plt1 := plot(rcurry(f,100),10..16):
plt2 := plot(rcurry(f,101),10..16):
plots[display](plt1,plt2);
&lt;/pre&gt;
&lt;div&gt;A nice exercise is computing where the bifurcation should occur as n goes to infinity.&amp;nbsp; I got (x,y) = (e^e, 1/e) = (15.15, 0.37). Actually, it isn't clear whether it is a bifurcation with n at infinity, or the point where the iteration diverges.&lt;/div&gt;</itunes:summary>
      <description>The latest comments added to the Post, Repeating Powers</description>
      <guid>73144</guid>
      <pubDate>Sun, 02 Mar 2008 21:23:24 Z</pubDate>
      <itunes:author>Joe
 Riel
</itunes:author>
      <author>Joe
 Riel
</author>
    </item>
    <item>
      <title>Building upon that</title>
      <link>http://www.mapleprimes.com/posts/39897-Repeating-Powers?ref=Feed:MaplePrimes:Repeating Powers:Comments#comment72977</link>
      <itunes:summary>&lt;p&gt;Joe Riel, I used your program to make another one that shows the bifurcation going to (e^e, 1/e) .&lt;/p&gt;
&lt;p&gt;restart; with(plots): f := proc (x, n) local y, z; z := 1./x; y := z; to n do y := z^y end do end proc:&lt;/p&gt;
&lt;p&gt;plt1 := animate(plot, [rcurry(f, 100*a), 10.0 .. 15.2], a = 1 .. 8):&lt;/p&gt;
&lt;p&gt;plt2 := animate(plot, [rcurry(f, 100*a+1), 10.0 .. 15.2], a = 1 .. 8):&lt;/p&gt;
&lt;p&gt;plt3 := plot([1/exp(1)], 10.0 .. 15.2, gridlines = true, linestyle = dash, color = blue):&lt;/p&gt;
&lt;p&gt;print(display(plt1, plt2, plt3, view = [9.9 .. 15.3, .35 .. .40])):&lt;/p&gt;
&lt;p&gt;&lt;a href="http://beta.mapleprimes.com/files/565_tetrations4.mw"&gt;Download 565_tetrations4.mw&lt;/a&gt;&lt;br /&gt;
&lt;a href="http://beta.mapleprimes.com/viewfile/2351"&gt;View file details&lt;/a&gt;&lt;/p&gt;
&lt;p&gt;&amp;nbsp;&lt;/p&gt;
&lt;p&gt;My program takes a couple of minutes to compute.&lt;a href="http:// marvinrayburns.com/begining.gif"&gt;&lt;br /&gt;
&lt;/a&gt;&lt;/p&gt;
&lt;p&gt;&lt;img width="500" height="500" align="left" alt="http://marvinrayburns.com/begining.gif" src="http://marvinrayburns.com/begining.gif" /&gt;&lt;/p&gt;
&lt;p&gt;&amp;nbsp;&lt;/p&gt;
&lt;p&gt;&lt;maple&gt;&lt;/maple&gt;&lt;/p&gt;</itunes:summary>
      <description>The latest comments added to the Post, Repeating Powers</description>
      <guid>72977</guid>
      <pubDate>Sun, 09 Mar 2008 01:01:05 Z</pubDate>
      <itunes:author>Marvin Ray Burns</itunes:author>
      <author>Marvin Ray Burns</author>
    </item>
  </channel>
</rss>