A168040 Primes p for which floor(p^E) is prime.

3, 5, 11, 97, 389, 463, 877, 937, 1049, 1061, 1283, 1307, 1319, 1453, 1579, 1657, 1907, 2081, 2143, 2339, 2351, 2383, 2459, 2687, 2741, 3061, 3433, 3547, 3581, 4027, 4241, 4363, 4447, 4481, 4831, 4903, 4919, 4973, 5171, 5737, 5939, 6257, 6269, 6299, 7159

Offset

1,1

Links

Table of n, a(n) for n=1..45.

Mathematica

$MaxExtraPrecision=7!; Select[Prime[Range[3*6! ]], PrimeQ[Floor[ #^E]]&]

Crossrefs

Sequence in context: A046928 A089070 A232536 * A068157 A062530 A089628

Adjacent sequences: A168037 A168038 A168039 * A168041 A168042 A168043

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Nov 17 2009

Status

approved