login
This site is supported by donations to The OEIS 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. 11
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, 75370126441, 75370125409, 75370122409, 75370121857, 75370121689 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

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

LINKS

Table of n, a(n) for n=1..37.

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 (p % primepi(p) == 1, print1(p, ", "))); \\ Michel Marcus, Jan 08 2015

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

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 June 16 15:17 EDT 2019. Contains 324152 sequences. (Running on oeis4.)