|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
|
|
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
|
|
CROSSREFS
|
Cf. A000040, A001223, A031131, A031165 - A031172, A072473, A092504.
Sequence in context: A258634 A280599 A066153 * A023650 A254950 A213492
Adjacent sequences: A213923 A213924 A213925 * A213927 A213928 A213929
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Vincenzo Librandi, Mar 06 2013
|
|
STATUS
|
approved
|
|
|
|