login
This site is supported by donations to The OEIS Foundation.

 

Logo

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A138676 Prime(n)^7 mod prime(n-1). 10
1, 2, 3, 4, 7, 4, 9, 6, 3, 12, 6, 30, 5, 1, 4, 43, 10, 7, 36, 57, 54, 31, 60, 45, 88, 27, 7, 21, 34, 98, 1, 120, 128, 62, 128, 133, 5, 84, 44, 22, 128, 112, 128, 172, 128, 67, 210, 105, 128 (list; graph; refs; listen; history; text; internal format)
OFFSET

2,2

COMMENTS

Related sequences type prime(n)^k mod prime(n-1) (k=1,2,3,4)

prime(n) mod prime(n-1) is given in A001223

prime(n)^2 mod prime(n-1) is given in A038702

prime(n)^3 mod prime(n-1) is given in A138672

prime(n)^4 mod prime(n-1) is given in A138673

prime(n)^5 mod prime(n-1) is given in A138674

prime(n)^6 mod prime(n-1) is given in A138675

prime(n)^7 mod prime(n-1) is given in A138676

prime(n)^8 mod prime(n-1) is given in A138677

prime(n)^9 mod prime(n-1) is given in A138678

prime(n)^10 mod prime(n-1) is given in A138679

prime(n)^11 mod prime(n-1) is given in A138680

prime(n)^12 mod prime(n-1) is given in A138681

LINKS

Table of n, a(n) for n=2..50.

EXAMPLE

a(1)=1 because 3^7 = 1 mod 2

a(2)=2 because 5^7 = 2 mod 3

MATHEMATICA

Table[Mod[Prime[n]^7, Prime[n - 1]], {n, 2, 50}]

(* The following program is more efficient because it only generates each prime once, but it is less easy to understand: *)

PowerMod[Last[#], 7, First[#]]&/@Partition[Prime[Range[60]], 2, 1] (* Harvey P. Dale, Sep 02 2016 *)

PROG

(MAGMA) [NthPrime(n)^7 mod NthPrime(n-1): n in [2..50]];  // Bruno Berselli, May 23 2011

CROSSREFS

Cf. A001223, A038702, A138672, A138673, A138674, A138675, A138676, A138677, A138678, A138679, A138680, A138681.

Sequence in context: A021430 A297110 A267695 * A297111 A035532 A176535

Adjacent sequences:  A138673 A138674 A138675 * A138677 A138678 A138679

KEYWORD

nonn

AUTHOR

Artur Jasinski, Mar 26 2008

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 17 05:26 EST 2019. Contains 319207 sequences. (Running on oeis4.)