login
A180451
Primes of the form floor(2*n^sqrt(2) - n).
1
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,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Table[Floor[2n^Sqrt[2] -n], {n, 1000}], PrimeQ] (* Harvey P. Dale, Jun 23 2013 *)
PROG
(PARI) for(n=1, 1e4, if(ispseudoprime(t=floor(2*n^sqrt(2)-n)), print1(t", "))); v \\ Charles R Greathouse IV, Feb 18 2011
CROSSREFS
Sequence in context: A296934 A062619 A339864 * A108137 A250027 A339545
KEYWORD
easy,nonn
AUTHOR
William A. Tedeschi, Sep 07 2010
EXTENSIONS
Sequence renamed by R. J. Mathar, Sep 09 2010
STATUS
approved