OFFSET
1,1
COMMENTS
For any prime q, successive prime gaps of 6 and 6*(q-1) will produce an entry of q in this sequence. We therefore expect each prime to occur infinitely often. The first appearances of the first 9 primes are at positions 2, 1, 185, 13, 2091, 60, 20352, 520, and 34248. - Robert Israel, Sep 01 2019
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
If n=1, then (p(1+2)-p(1))/(p(1+1)-p(1))=(5-2)/(3-2)=3=a(1).
If n=2, then (p(2+2)-p(2))/(p(2+1)-p(2))=(7-3)/(5-3)=2=a(2).
If n=3, then (p(3+2)-p(3))/(p(3+1)-p(3))=(11-5)/(7-5)=3= a(3).
MAPLE
for n from 1 to 1230 do p := (ithprime(n+2)-ithprime(n)) / (ithprime(n+1)-ithprime(n) ) ; if type(p, 'integer') then if isprime(p) then printf("%d, ", p) ; end if; end if; end do: # R. J. Mathar, Apr 28 2010
MATHEMATICA
Select[(#[[3]]-#[[1]])/(#[[2]]-#[[1]])&/@Partition[Prime[ Range[ 1000]], 3, 1], PrimeQ] (* Harvey P. Dale, Aug 20 2017 *)
CROSSREFS
KEYWORD
nonn,less
AUTHOR
Juri-Stepan Gerasimov, Oct 06 2008
EXTENSIONS
Sequence corrected from a(3) onwards by R. J. Mathar, Apr 28 2010
STATUS
approved