OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MAPLE
a:=n->2*ithprime(n)-ithprime(n+1)+2: seq(a(n), n=1..75); # Emeric Deutsch, Nov 28 2006
MATHEMATICA
2#[[1]]-#[[2]]+2&/@Partition[Prime[Range[60]], 2, 1] (* Harvey P. Dale, May 25 2012 *)
PROG
(PARI) {p=2; q=3; while(p<280, print1(2*p-q+2, ", "); p=q; q=nextprime(q+1))} \\ Klaus Brockhaus, Nov 28 2006
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Nov 28 2006
EXTENSIONS
Edited, corrected and extended by Klaus Brockhaus and Emeric Deutsch, Nov 28 2006
STATUS
approved