A180451 Primes of the form floor(2*k^sqrt(2) - k).

3, 19, 29, 41, 101, 109, 127, 281, 293, 353, 509, 523, 743, 821, 853, 919, 1019, 1193, 1229, 1283, 1301, 2503, 2683, 2797, 2843, 3221, 3637, 3863, 4093, 4327, 4889, 4943, 5897, 6451, 6481, 6659, 6689, 6719, 6779, 6869, 6899, 7541, 7603, 7759, 7853, 8423

Offset: 1

Author

William A. Tedeschi, Sep 07 2010

Keywords

• easy
• nonn

Links

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

Programs

Mathematica

Select[Table[Floor[2n^Sqrt[2] -n],{n,1000}],PrimeQ] (* Harvey P. Dale, Jun 23 2013 *)

PARI

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

Extensions

Sequence renamed by R. J. Mathar, Sep 09 2010