A238291 Final digit of real part of (n+n*i)^n.

1, 0, 6, 6, 0, 0, 4, 6, 4, 0, 8, 6, 8, 0, 0, 6, 2, 0, 2, 0, 6, 0, 6, 6, 0, 0, 4, 6, 4, 0, 8, 6, 8, 0, 0, 6, 2, 0, 2, 0, 6, 0, 6, 6, 0, 0, 4, 6, 4, 0, 8, 6, 8, 0, 0, 6, 2, 0, 2, 0, 6, 0, 6, 6, 0, 0, 4, 6, 4, 0, 8, 6, 8, 0, 0, 6, 2, 0, 2, 0, 6, 0, 6, 6, 0, 0

Offset: 1

Author

José María Grau Ribas, Feb 22 2014

Keywords

• nonn
• base

Comments

Starting from a(2) the sequence is periodic with period length 20. - Giovanni Resta, Feb 23 2014

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000
• Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).

Crossrefs

Cf. A238292, A056849.

Programs

Mathematica

re[n_, b_] := Mod[b + Re@PowerMod[(n + n I), n, b], b];
Table[re[n, 10], {n, 100}]