A225625 Primes of the form floor(log(p)) + p^2, where p is prime.

4493, 5333, 9413, 10613, 18773, 185767, 323767, 502687, 737887, 863047, 885487, 942847, 982087, 1079527, 488100659, 511709651, 514337051, 515153819, 515698691, 517062131, 526381259, 527207531, 527299379, 533009579, 536339291, 536987939, 538100819, 546110171

Offset

1,1

Links

John-Å. W. Olsen, Table of n, a(n) for n = 1..5000

Example

Floor(log(67)) + 67^2 = 4493.
Floor(log(22093)) + 22093^2 = 488100659.

Mathematica

p = Prime[Range[3000]]; Select[p^2 + Floor[Log[p]], PrimeQ] (* T. D. Noe, May 13 2013 *)

Crossrefs

Cf. A225626 (primes p).

Sequence in context: A345859 A031565 A031745 * A184465 A144490 A252470

Adjacent sequences: A225622 A225623 A225624 * A225626 A225627 A225628

Keyword

nonn

Author

John-Å. W. Olsen, May 11 2013

Status

approved