|
%I #18 Mar 15 2023 12:39:21
%S 2,7,13,19,29,31,37,43,53,59,61,67,73,79,89,97,97,103,109,127,127,127,
%T 137,139,149,151,157,163,173,179,181,191,193,199,211,211,223,223,229,
%U 239,241,251,257,263,269,271,277,283,293,307,307
%N Smallest prime >= 6*n.
%F a(n) = A007918(A008588(n)). - _Michel Marcus_, Feb 13 2021
%t Prime[1+PrimePi[6Range[0,50]]] (* _T. D. Noe_, Nov 15 2006 *)
%t NextPrime[6*Range[0,50]] (* _Harvey P. Dale_, Sep 05 2015 *)
%o (PARI) a(n) = nextprime(6*n); \\ _Michel Marcus_, Feb 13 2021
%Y Cf. A007918, A008588, A060308, A060264, A118747-A118754.
%Y A002476 is a subsequence.
%K easy,nonn
%O 0,1
%A _Jonathan Vos Post_, Apr 29 2006
%E Corrected by _T. D. Noe_, Nov 15 2006
|
