%N Let a(n) be the n-th term of the sequence. Let m = primorial(a(n)); m is the minimum positive integer such that m/phi(m) >= n.
%C A variant of A091440, which is the main entry for this sequence.
%e primorial(7) = 210; 210/phi(210) = 210/48 >= 4;
%o (PARI) al(lim) = local(mm,n,m); mm=3; n=2; m=1; forprime(x=3,lim, n*=x; m*= (x-1); if (n\m >= mm, print1(x","); mm++)); /* This will generate all terms of this sequence from the 3rd onward, up to lim. The computation slows down for large values because of the size of the internal values. */
%Y Cf. A091440.
%A _Fred Schneider_, Aug 13 2009
%E Edited and extended by _Franklin T. Adams-Watters_ and _N. J. A. Sloane_, Aug 29 2009