|
| |
|
|
A153064
|
|
a(n) = floor(b(n)) where b(-1)=2, b(n)=b(n-1)^2-n^b(n-1).
|
|
0
| | |
|
|
|
OFFSET
| -1,1
|
|
|
COMMENTS
| a(4) ~ -5.3069609889*10^637609736, and is too large for display. [D. S. McNeil, November 28 2010]
|
|
|
MATHEMATICA
| a=2; lst={}; Do[a=a^2-n^a; AppendTo[lst, Floor[a]], {n, 0, 3}]; lst
|
|
|
PROG
| (PARI) print1(a=2); for(n=0, 3, print1(", "floor(a=a^2-n^a)))
|
|
|
CROSSREFS
| Cf. A056520, A153056, A153057, A153058, A153059, A086851, A153060, A098152, A028300, A153061, A153062, A153063
Sequence in context: A065598 A100528 A132483 * A125594 A097542 A094670
Adjacent sequences: A153061 A153062 A153063 * A153065 A153066 A153067
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), Dec 17 2008
|
|
|
EXTENSIONS
| Definition clarified by R. J. Mathar and M. F. Hasler, Nov 27 2010
|
| |
|
|