A370011 - OEIS

%I #8 Feb 16 2024 15:08:39

%S 11,13,23,29,47,53,71,79,97,127,127,149,167,173,191,223,239,251,269,

%T 293,293,317,337,359,389,409,419,431,439,457,509,541,557,557,599,607,

%U 631,653,673,701,719,727,769,773,797,797,853,907,911,919,937,967,967

%N a(n) is the least prime greater than 4*prime(n).

%e 7 < 4*2 < 11 < 4*3 < 13 < 17 < 19 < 4*5 < 23, so (a(1), a(2), a(3)) = (11,13,23).

%t Table[NextPrime[Prime[PrimePi[4*Prime[n]]]], {n, 1, 200}]

%o (PARI) a(n) = nextprime(4*prime(n)); \\ _Michel Marcus_, Feb 10 2024

%Y Cf. A000040, A001749, A059786, A059788, A370008, A370010.

%K nonn

%O 1,1

%A _Clark Kimberling_, Feb 09 2024