OFFSET
1,5
FORMULA
a(n) = A000040(n)-2n+1.
MAPLE
A131733 := proc(n) ithprime(n)-2*n+1 ; end proc: # R. J. Mathar, Jul 10 2011
MATHEMATICA
With[{nn=70}, Prime[Range[nn]]-Range[1, 2nn, 2]] (* Harvey P. Dale, Jun 12 2013 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paul Curtz, Sep 17 2007
STATUS
approved