login
Index of the first occurrence of prime(n) in A060324.
1

%I #6 Dec 05 2013 19:55:58

%S 1,3,7,13,37,31,89,51,101,219,309,973,146,832,464,1031,2714,2352,6403,

%T 311,6397,6352,1487,1439,20718,4252,11958,3719,1332,4136,14509,4601,

%U 4223,12414,4043,38862,57949,20257,4958,4832,2213,96792,27932,261337

%N Index of the first occurrence of prime(n) in A060324.

%C Smallest k such that k*prime(n) + k - 1 is a prime.

%H Franklin T. Adams-Watters, <a href="/A078454/b078454.txt">Table of n, a(n) for n = 1..100</a>

%o Contribution from _Franklin T. Adams-Watters_, May 25 2010: (Start)

%o (PARI) A060324(n)=forprime(q=2,999999999,if(isprime(n*(q+1)-1),return(q)));-1

%o al(n)=local(v,k,xv);v=vector(n);while(n>0,xv=primepi(A060324(k++));if(xv<=#v&v[xv]==0,v[xv]=k;n--));v (End)

%Y Cf. A060324.

%K nonn

%O 1,2

%A _Amarnath Murthy_, Dec 23 2002

%E More terms from _Franklin T. Adams-Watters_, May 25 2010