A378137 a(n) = p(n^2*p(n)), where p(x) is the least prime > x.

2, 3, 13, 47, 83, 179, 257, 541, 709, 907, 1103, 1579, 1873, 2879, 3343, 3833, 4357, 5501, 6163, 8311, 9203, 10151, 11149, 15349, 16729, 18127, 19609, 21143, 22739, 26083, 27901, 35569, 37889, 40343, 42773, 45329, 47963, 56131, 59207, 62383, 65609, 72287

Offset

0,1

Links

Table of n, a(n) for n=0..41.

Formula

a(n) = A151800(n^2*A151800(n)).

Example

p(2) = 3, so a(2) = p(4*p(2)) = 13.

Mathematica

Table[NextPrime[n^2*NextPrime[n]], {n, 0, 80}]

Crossrefs

Cf. A000040, A151800, A378135, A378136.

Sequence in context: A206776 A275556 A214888 * A203985 A164511 A184256

Adjacent sequences: A378134 A378135 A378136 * A378139 A378140 A378141

Keyword

nonn

Author

Clark Kimberling, Dec 21 2024

Status

approved