A107964 a(n) = A107712(n) - A002110(n).

0, 1, 29, 971, 45979, 2798423, 247080797, 25626335843, 3359804735327, 525737696543051, 86239141244378363, 16043263182247602671, 3203015846871245149541, 765364544195714620296857

Offset: 0

Author

Leroy Quet, Jun 12 2005

Keywords

• nonn

Comments

n-th term is coprime to first (2n) primes.

Crossrefs

Cf. A107712, A002110.

Programs

Mathematica

f[n_] := Product[Prime[k + n], {k, n}] - Product[Prime[k], {k, n}]; Table[ f[n], {n, 0, 14}] (* Robert G. Wilson v, Jun 14 2005 *)

Extensions

More terms from Robert G. Wilson v, Jun 14 2005