axiom-developer
[Top][All Lists]

[Axiom-developer] [Guessing Sequence] (new)

 From: wyscc Subject: [Axiom-developer] [Guessing Sequence] (new) Date: Thu, 09 Jun 2005 01:33:36 -0500

Changes http://page.axiom-developer.org/zope/mathaction/GuessingSequence/diff
--
This page makes test uses of the Guess package by Martin Rubey. Feel free to
change the sequence to ones you like to try.

We need to load these packages:

\begin{axiom}
)lib RINTERPA RINTERP PCDEN GUESS GUESSINT GUESSP
\end{axiom}

Click [Guess] for the source code.

\begin{axiom}
guessExpRat(n,[(1+x)^x for x in 1..4],i+->i)$GUESSINT \end{axiom} A workaround is necessary, because of bug #128 \begin{axiom} l := [1, 1, 1+q, 1+q+q^2, 1+q+q^2+q^3+q^4, 1+q+q^2+q^3+2*q^4+q^5+q^6, 1+q+q^2+q^3+2*q^4+2*q^5+2*q^6+q^7+q^8+q^9, (1+q^4+q^6)*(1+q+q^2+q^3+q^4+q^5+q^6), (1+q^4)*(1+q+q^2+q^3+q^4+q^5+2*q^6+2*q^7+2*q^8+2*q^9+q^10+q^11+q^12)] (guessPRec(n,l,i+->q^i)$GUESSP).1
\end{axiom}

\begin{axiom}
listA := [1, 9, 113, 1719, 28981, 521103];
listB := [1, 9,  49,  279,  1793,  12441];
listC := [1, 9, 113, 1711, 28729, 514615];
listD := [1, 9,  49,  271,  1613,  10013];
guessExpRat(n,listA,i+->i)$GUESSINT guessPRec(n,listA,i+->i)$GUESSP
guessExpRat(n,listB,i+->i)$GUESSINT guessPRec(n,listB,i+->i)$GUESSP
guessExpRat(n,listC,i+->i)$GUESSINT guessPRec(n,listC,i+->i)$GUESSP
guessExpRat(n,listD,i+->i)$GUESSINT guessPRec(n,listD,i+->i)$GUESSP
\end{axiom}
--