login

Revision History for A064855

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
a(n) = (((6^n mod 5^n) mod 4^n) mod 3^n) mod 2^n.
(history; published version)
#13 by N. J. A. Sloane at Tue Jun 19 05:14:15 EDT 2018
STATUS

proposed

approved

#12 by Jon E. Schoenfield at Mon Jun 18 23:03:53 EDT 2018
STATUS

editing

proposed

#11 by Jon E. Schoenfield at Mon Jun 18 23:03:50 EDT 2018
NAME

Mod[Mod[Mod[Mod[a(n) = (((6^n, mod 5^n], ) mod 4^n], ) mod 3^n], ) mod 2^n].

COMMENTS

A generalization of A002380, A064536 and A064854. It arises also as a coefficient (=c1) of 1^n=1 in a special (greedy) decomposition of 6^n into like powers as follows: 6^n = c5*5^n + c4*4^n + c3*3^n + c2*2^n + c1*1^n.

LINKS

Harry J. Smith, <a href="/A064855/b064855.txt">Table of n, a(n) for n = 1,...,200</a>

FORMULA

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.

PROG

(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]

STATUS

approved

editing

#10 by Charles R Greathouse IV at Thu Nov 21 12:47:33 EST 2013
MATHEMATICA

Table[Fold[Mod, 6^n, Range[5, 2, -1]^n], {n, 40}] (* From _Harvey P. Dale, _, Mar 14 2011 *)

Discussion
Thu Nov 21
12:47
OEIS Server: https://oeis.org/edit/global/2062
#9 by N. J. A. Sloane at Tue Oct 15 22:31:08 EDT 2013
AUTHOR

_Labos E. (labos(AT)ana.sote.hu), Elemer_, Oct 08 2001

Discussion
Tue Oct 15
22:31
OEIS Server: https://oeis.org/edit/global/2029
#8 by Russ Cox at Fri Mar 30 17:24:27 EDT 2012
PROG

(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]

Discussion
Fri Mar 30
17:24
OEIS Server: https://oeis.org/edit/global/133
#7 by T. D. Noe at Mon Mar 14 17:01:20 EDT 2011
STATUS

reviewed

approved

#6 by Harvey P. Dale at Mon Mar 14 12:04:36 EDT 2011
STATUS

proposed

reviewed

#5 by Harvey P. Dale at Mon Mar 14 12:04:27 EDT 2011
MATHEMATICA

Table[Fold[Mod, 6^n, Range[5, 2, -1]^n], {n, 40}] (* From Harvey P. Dale, Mar 14 2011 *)

STATUS

approved

proposed

#4 by N. J. A. Sloane at Thu Nov 11 07:34:06 EST 2010
LINKS

Harry J. Smith, <a href="/A064855/b064855.txt">Table of n, a(n) for n=1,...,200</a>

KEYWORD

nonn,new

nonn