A180448 Primes of the form floor(n^sqrt(2)).

2, 7, 29, 37, 41, 59, 79, 89, 197, 281, 311, 431, 491, 571, 607, 617, 673, 683, 751, 997, 1019, 1051, 1117, 1217, 1229, 1297, 1321, 1367, 1571, 1583, 1607, 1657, 1669, 1871, 1949, 2309, 2447, 2503, 2531, 2687, 2903, 3413, 3613, 3739, 3881, 3929, 4057, 4073, 4219

Offset

1,1

Links

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

Formula

A134886 INTERSECT A000040.

Mathematica

Select[Floor[Range[0, 500]^Sqrt[2]], PrimeQ] (* Harvey P. Dale, May 20 2011 *)

Prog

(PARI) for(n=1, 154392, if(ispseudoprime(t=floor(n^sqrt(2))), print1(t", "))); v \\ Charles R Greathouse IV, Feb 18 2011

Crossrefs

Sequence in context: A337429 A059803 A076043 * A116968 A162172 A274682

Adjacent sequences: A180445 A180446 A180447 * A180449 A180450 A180451

Keyword

easy,nonn

Author

William A. Tedeschi, Sep 07 2010

Extensions

Formula rewritten by R. J. Mathar, Sep 09 2010

Status

approved