This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A167348 #4 Oct 02 2013 16:23:32 %S A167348 2,2,3,7,13,23,43,79,149,257,461,821,1451,2549,4483,7879,13859,24247, %T A167348 42683,75037,131707,230773,405401,710569,1246379,2185021,3831913, %U A167348 6720059,11781551,20657677,36221753,63503639,111333529,195199289 %N A167348 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 A167348 A variant of A091440, which is the main entry for this sequence. %e A167348 primorial(7) = 210; 210/phi(210) = 210/48 >= 4; %o A167348 (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 A167348 Cf. A091440. %K A167348 nonn %O A167348 1,1 %A A167348 _Fred Schneider_, Aug 13 2009 %E A167348 Edited and extended by _Franklin T. Adams-Watters_ and _N. J. A. Sloane_, Aug 29 2009