|
Search: id:A152838
|
|
|
| A152838 |
|
a(0)=1; a(n)=Floor[a(n-1)^n-n^a(n-1)]. |
|
+0
4
|
|
| 1, 0, -1, -2, 3, 118, -1990681340347851531954093709799648794997684473417658463291462572071259654122817\ 84631240438088
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
EXAMPLE
|
a(1) = 1^1-1^1 = 0. - R. J. Mathar, Jan 08 2009
|
|
MATHEMATICA
|
lst={}; a=1; Do[a=a^n-n^a; AppendTo[lst, Floor[a]], {n, 0, 6}]; lst
|
|
CROSSREFS
|
Cf. A084964, A152832, A152833, A152835, A152836, A152837
Sequence in context: A117700 A084755 A127819 this_sequence A102697 A041813 A065842
Adjacent sequences: A152835 A152836 A152837 this_sequence A152839 A152840 A152841
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), Dec 14 2008
|
|
EXTENSIONS
|
Indices added to definition, offset corrected - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jan 08 2009
|
|
|
Search completed in 0.002 seconds
|
