OFFSET
1,2
FORMULA
EXAMPLE
a(1) = prime(2*1^2) - 2*1^2 = prime(2) - 2 = 3 - 2 = 1.
a(2) = prime(2*2^2) - 2*2^2 = prime(8) - 8 = 19 - 8 = 11.
MAPLE
a:=proc(n) options operator, arrow: ithprime(2*n^2)-2*n^2 end proc: seq(a(n), n=1..45); # Emeric Deutsch, Aug 07 2008
MATHEMATICA
Prime[#]-#&/@(2*Range[50]^2) (* Harvey P. Dale, May 04 2016 *)
PROG
(PARI) a(n) = my(m = 2*n^2); prime(m) - m; \\ Michel Marcus, Mar 08 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Jul 31 2008
EXTENSIONS
Corrected and extended by Emeric Deutsch, Aug 07 2008
STATUS
approved