login
A213926
prime(n^2) - prime(n).
3
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,2
LINKS
FORMULA
a(n) = A000040(n^2) - A000040(n).
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}]
PROG
(Magma) [NthPrime(n^2)-NthPrime(n): n in [1..40]];
(PARI) a(n)=prime(n^2)-prime(n) \\ Charles R Greathouse IV, Mar 21 2014
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Mar 06 2013
STATUS
approved