A153480 a(n) = 2*prime(n)^2 - 4.

4, 14, 46, 94, 238, 334, 574, 718, 1054, 1678, 1918, 2734, 3358, 3694, 4414, 5614, 6958, 7438, 8974, 10078, 10654, 12478, 13774, 15838, 18814, 20398, 21214, 22894, 23758, 25534, 32254, 34318, 37534, 38638, 44398, 45598, 49294, 53134, 55774

Offset

0,1

Links

G. C. Greubel, Table of n, a(n) for n = 0..1000

Formula

a(n) = A079704(n)-4 = 2*A049001(n). - R. J. Mathar, Jan 03 2009

Mathematica

Clear[a, k]; a[k_] := 2*Prime[k]^2 - 4; Table[a[k], {k, 1, 30}]
2*Prime[Range[25]]^2 - 4 (* G. C. Greubel, Aug 18 2016 *)
Table[2 Prime[n]^2 - 4, {n, 60}] (* Vincenzo Librandi, Aug 19 2016 *)

Prog

(Magma) [2*NthPrime(n)^2-4: n in [1..40]]; // Vincenzo Librandi, Aug 19 2016

Crossrefs

Cf. A079704, A049001.

Sequence in context: A094688 A068092 A255678 * A229007 A232060 A302238

Adjacent sequences: A153477 A153478 A153479 * A153481 A153482 A153483

Keyword

nonn

Author

Roger L. Bagula, Dec 27 2008

Extensions

Extended by R. J. Mathar, Jan 03 2009

Status

approved