OFFSET
1,4
MATHEMATICA
Table[Mod[Plus@@IntegerDigits[7^n], n], {n, 150}] (* Harvey P. Dale, Dec 16 2010 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
N. J. A. Sloane, Dec 03 2010
STATUS
approved