OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..5000
EXAMPLE
a(1)=abs(3-1)/2=1; a(2)=abs(5-9)/2=abs(-2)=2; a(3)=abs(7-15)/2=abs(-4)=4.
MATHEMATICA
A014076 := Select[Range@500, ! PrimeQ@# && OddQ@# &]; A065091 := Prime[Range[2, 500]]; Table[Abs[A065091[[n]] - A014076[[n]]]/2, {n, 1, 50}] (* G. C. Greubel, Sep 17 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Oct 09 2009
EXTENSIONS
Entries checked by R. J. Mathar, May 21 2010
STATUS
approved