|
%I #18 Aug 11 2023 09:59:02
%S 1,1,11,1,1,29,23,43,41,73,59,1,89,67,73,107,89,101,127,97,83,89,1,
%T 251,131,113,151,263,251,223,179,389,281,151,197,173,239,233,191,223,
%U 223,293,593,293,457,227,311,373,257,307,313,607,347,317,307,677,467,317
%N Distance of n-th primorial from previous prime.
%H Robert G. Wilson v, <a href="/A060270/b060270.txt">Table of n, a(n) for n = 2..1000</a>
%F a(n)=1 for n=2, 3, 5, 6, 13, 24, 66, 68, 167, ... (A057704); a(n)=A055211(n) otherwise. - _Jeppe Stig Nielsen_, Oct 31 2003
%e Before 7th primorial 510481 is the largest prime. Its distance from 510510 is a(7)=29.
%p [seq(product(ithprime(j),j=1..n)-prevprime(product(ithprime(j),j=1..n)), n=2..50)];
%t Map[# - NextPrime[#, -1] &, Rest@ FoldList[Times, Prime@ Range[59]]] (* _Michael De Vlieger_, Aug 10 2023 *)
%o (PARI) a(n) = my(P=vecprod(primes(n))); P-precprime(P-1); \\ _Michel Marcus_, Aug 11 2023
%Y Cf. A002110, A038710, A007014, A058044, A038711, A055211.
%K nonn
%O 2,3
%A _Labos Elemer_, Mar 23 2001
%E More terms from _Jeppe Stig Nielsen_, Oct 31 2003
|
