login
Primes that are congruent to 3 mod n, where n is the index of the prime.
6

%I #14 Feb 25 2020 11:22:39

%S 2,3,7,17,19,127,131,139,373,383,8419,64553,175211,3523901,3524713,

%T 70115789,514273231,514275283,1394194363,1394197423,1394197543,

%U 1394198683,1394198863,1394199083,1394199263,1394199283,10246935823,204475053103,4086199302923,11091501631097

%N Primes that are congruent to 3 mod n, where n is the index of the prime.

%H Giovanni Resta, <a href="/A171430/b171430.txt">Table of n, a(n) for n = 1..46</a>

%e Mod(7,4)=3, Mod(17,7)=3.

%t Prime@ Select[Range[10^5], Mod[Prime[#] - 3, #] == 0 &] (* _Giovanni Resta_, Feb 25 2020 *)

%Y Cf. A023145, A048891.

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Dec 08 2009

%E a(14) from _Harvey P. Dale_, Oct 21 2016

%E Terms a(1)-a(2), a(17) and beyond from _Giovanni Resta_, Feb 23 2020