proposed
approved
proposed
approved
editing
proposed
Mod[Mod[Mod[Mod[a(n) = (((6^n, mod 5^n], ) mod 4^n], ) mod 3^n], ) mod 2^n].
Harry J. Smith, <a href="/A064855/b064855.txt">Table of n, a(n) for n = 1,...,200</a>
n = 8: 6^8 = 1679616 = 4*[390625] + 1*[65536] + 7*[6561] + 22*[256] + 21*[1] where a(8)=21, the last coefficient and here 6^8 is decomposed into 4 + 1 + 7 + 22 + 21 = 55 like (8th) powers.
(PARI) { for (n=1, 200, a=(((6^n%5^n)%4^n)%3^n)%2^n; write("b064855.txt", n, " ", a) ) } [From _\\ _Harry J. Smith_, Sep 28 2009]
approved
editing
Table[Fold[Mod, 6^n, Range[5, 2, -1]^n], {n, 40}] (* From _Harvey P. Dale, _, Mar 14 2011 *)
_Labos E. (labos(AT)ana.sote.hu), Elemer_, Oct 08 2001
(PARI) { for (n=1, 200, a=(((6^n%5^n)%4^n)%3^n)%2^n; write("b064855.txt", n, " ", a) ) } [From _Harry J. Smith (hjsmithh(AT)sbcglobal.net), _, Sep 28 2009]
reviewed
approved
proposed
reviewed
Table[Fold[Mod, 6^n, Range[5, 2, -1]^n], {n, 40}] (* From Harvey P. Dale, Mar 14 2011 *)
approved
proposed
Harry J. Smith, <a href="/A064855/b064855.txt">Table of n, a(n) for n=1,...,200</a>
nonn,new
nonn