A066610 a(n) = remainder when 6^n is divided by n^6.

0, 36, 216, 1296, 7776, 0, 44638, 106752, 511758, 466176, 1398612, 0, 4175671, 4282944, 2765826, 4259840, 20220503, 0, 36376760, 40062976, 25606125, 57077760, 109780662, 0, 144545126, 283401024, 0, 454885376, 299969829

Offset

1,2

Links

Harry J. Smith, Table of n, a(n) for n = 1..1000

Example

a(7) = 44638 as 6^7 = 279936 = (7^6)*2 + 44638.

Mathematica

Table[ Mod[6^n, n^6], {n, 1, 30} ]
Table[PowerMod[6, n, n^6], {n, 30}] (* Harvey P. Dale, Jan 21 2019 *)

Prog

(PARI) { for (n=1, 1000, write("b066610.txt", n, " ", 6^n % n^6) ) } \\ Harry J. Smith, Mar 11 2010

Crossrefs

Sequence in context: A232670 A365308 A230470 * A176696 A269031 A113164

Adjacent sequences: A066607 A066608 A066609 * A066611 A066612 A066613

Keyword

nonn

Author

Amarnath Murthy, Dec 24 2001

Extensions

More terms from Robert G. Wilson v, Dec 26 2001

Status

approved