|
%I #9 Jul 30 2015 23:01:00
%S 0,1,29,971,45979,2798423,247080797,25626335843,3359804735327,
%T 525737696543051,86239141244378363,16043263182247602671,
%U 3203015846871245149541,765364544195714620296857
%N a(n) = A107712(n) - A002110(n).
%C n-th term is coprime to first (2n) primes.
%t 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 *)
%Y Cf. A107712, A002110.
%K nonn
%O 0,3
%A _Leroy Quet_, Jun 12 2005
%E More terms from _Robert G. Wilson v_, Jun 14 2005
|
