OFFSET
1,1
COMMENTS
Entries may be repeated and are shown in order of increasing generator n.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
n=2: 2/(p(2)-p(2-1))=2/(3-2)=2=a(1).
n=4: 4/(p(4)-p(4-1))=4/(7-5)=2=a(2).
n=6: 6/(p(6)-p(6-1))=6/(13-11)=3=a(3).
n=12: 12/(p(12)-p(12-1))=12/(37-31)=2=a(4).
n=14: 14/(p(14)-p(14-1))=14/(43-41)=7=a(5).
n=20: 20/(p(20)-p(20-1))=20/(71-67)=5=a(6).
n=28: 28/(p(28)-p(28-1))=28/(107-103)=7=a(7),
MATHEMATICA
Select[Table[n/(Prime[n]-Prime[n-1]), {n, 2, 2500}], PrimeQ] (* Harvey P. Dale, Jan 23 2013 *)
With[{nn=3000}, Select[#[[1]]/#[[2]]&/@Thread[{Range[2, nn], Abs[ Differences[ Prime[Range[nn]]]]}], PrimeQ]] (* Harvey P. Dale, Jun 18 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Sep 13 2008
EXTENSIONS
Corrected and extended by R. J. Mathar, Sep 26 2008
STATUS
approved