login
A154737
Integers k of the form k=n^k-k, k=2.
0
-1, 1, 3, 164, 6957245584036948615038006292270726370571486830808434942221507554589944046539124911869946306936720078616701636095631
OFFSET
1,3
MATHEMATICA
k=2; lst={}; Do[k=n^k-k; AppendTo[lst, Floor[k]], {n, 5}]; lst
CROSSREFS
Sequence in context: A212806 A368600 A030258 * A285488 A112896 A185242
KEYWORD
sign
AUTHOR
STATUS
approved