A213926 prime(n^2) - prime(n).

0, 4, 18, 46, 86, 138, 210, 292, 396, 512, 630, 790, 968, 1150, 1380, 1566, 1820, 2082, 2370, 2670, 3010, 3382, 3720, 4122, 4540, 4950, 5416, 5900, 6372, 6884, 7446, 8030, 8600, 9202, 9782, 10476, 11164, 11886, 12576, 13326, 14148, 14920, 15686, 16554, 17412

Offset: 1

Author

Vincenzo Librandi, Mar 06 2013

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000040, A001223, A031131, A031165 - A031172, A072473, A092504.

Programs

Magma

[NthPrime(n^2)-NthPrime(n): n in [1..40]];

Maple

A213926 := proc(n) ithprime(n^2)-ithprime(n) ; end proc: seq(A213926(n), n=1..40) ;

Mathematica

Table[Prime[n^2] - Prime[n], {n, 40}]

PARI

a(n)=prime(n^2)-prime(n) \\ Charles R Greathouse IV, Mar 21 2014

Formula

a(n) = A000040(n^2) - A000040(n).