|
Search: id:A086851
|
|
|
| A086851 |
|
a(0) = 1, a(n+1) = a(n)^2 - n. |
|
+0 8
|
|
| 1, 1, 0, -2, 1, -3, 4, 10, 93, 8641, 74666872, 5575141774264374, 31082205803147712138788845611865, 966103517589229313003894215813508352493573272034098666228778213, 93335600669828231257230325648981601212278340625458314124849901619286521411676070\ 3502264792586180597344027491798667186743473356
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
MAPLE
|
a := proc(n) option remember: if n=0 then RETURN(1) fi: a(n-1)^2-n+1: end: for n from 0 to 15 do printf(`%d, `, a(n)) od:
|
|
MATHEMATICA
|
a=1; lst={}; Do[a=a^2-n; AppendTo[lst, a], {n, 0, 14}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Dec 17 2008]
|
|
CROSSREFS
|
Cf. A153056, A153057, A153059, A153059 [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Dec 17 2008]
Sequence in context: A007444 A166476 A052950 this_sequence A001054 A141487 A099866
Adjacent sequences: A086848 A086849 A086850 this_sequence A086852 A086853 A086854
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
David McLeod Moulton (dmoulton(AT)asianinc.org), Aug 18 2003
|
|
|
Search completed in 0.002 seconds
|