login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A048891 Primes that are congruent to 1 mod n, where n is the index of the prime. 12
2, 3, 11, 13, 37, 43, 1087, 64591, 64601, 64661, 1304707, 3523969, 3524249, 9558541, 189963073, 189963091, 189963847, 189968887, 189969319, 189969337, 1394194181, 1394194481, 1394194561, 1394197381, 1394199221, 1394199241, 3779851321, 3779851363, 3779856571, 10246935931, 10246936019, 10246936481, 75370121689, 75370121857, 75370122409, 75370125409, 75370126441 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Based on problem by G. L. Honaker, Jr.

A subsequence of A073465. - Ivan N. Ianakiev, Aug 06 2019

LINKS

Giovanni Resta, Table of n, a(n) for n = 1..94

FORMULA

A087611(a(n)) = 0. - Reinhard Zumkeller, Sep 11 2003

a(n) = A000040(A023143(n)). - Zak Seidov, Feb 19 2015

EXAMPLE

13 is the 6th prime and 13 == 1 mod 6.

MATHEMATICA

f[p_, n_]:=Mod[p, n]==0; lst={}; Do[p=Prime[n]; If[f[p-1, n], AppendTo[lst, p]], {n, 10!}]; lst (* Vladimir Joseph Stephan Orlovsky, Dec 08 2009 *)

PROG

(PARI) lista(nn) = forprime(p=1, nn, if (Mod(p, primepi(p)) == 1, print1(p, ", "))); \\ Michel Marcus, Jan 08 2015; Aug 06 2019

CROSSREFS

Cf. A000040, A023143, A045924, A052013.

Sequence in context: A085306 A161322 A123239 * A215358 A191057 A068820

Adjacent sequences:  A048888 A048889 A048890 * A048892 A048893 A048894

KEYWORD

nonn

AUTHOR

Jud McCranie

EXTENSIONS

More terms from Zak Seidov, Feb 19 2015

Terms a(33)-a(37) sorted into correct order by Giovanni Resta, Feb 23 2020

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 July 2 11:54 EDT 2020. Contains 335398 sequences. (Running on oeis4.)