|
|
A152837
|
|
a(0)=-1; a(n)=Floor[n^a(n-1)-a(n-1)^n].
|
|
4
|
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
EXAMPLE
|
a(1) = 1^(-1)-(-1)^1 = 2. - R. J. Mathar, Jan 08 2009
|
|
MATHEMATICA
|
lst={}; a=1; Do[a=n^a-a^n; AppendTo[lst, Floor[a]], {n, 0, 7}]; lst
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Indices added to definition, offset corrected - R. J. Mathar, Jan 08 2009
|
|
STATUS
|
approved
|
|
|
|