Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A184805
Primes of the form floor(k*s), where s=(5+sqrt(5))/4.
2
3, 5, 7, 19, 23, 37, 41, 43, 47, 59, 61, 79, 83, 97, 101, 103, 113, 137, 139, 151, 157, 173, 179, 191, 193, 197, 211, 227, 229, 233, 251, 269, 271, 293, 307, 311, 331, 347, 349, 359, 367, 379, 383, 397, 401, 419, 421, 439, 443, 457, 461, 463, 479, 499, 557, 569, 571, 577, 587, 593, 607, 613, 631, 647, 653, 683, 691, 701, 709, 719, 727, 739, 743, 757, 761, 797, 821, 823, 839, 853, 857, 859, 877, 911, 929, 937, 947, 953, 967, 971, 991, 1009, 1013, 1031, 1049, 1051, 1061, 1063, 1069
OFFSET
1,1
EXAMPLE
See A184802.
MATHEMATICA
(See A184802.)
With[{s=(5+Sqrt[5])/4}, Select[Table[Floor[s*n], {n, 600}], PrimeQ]] (* Harvey P. Dale, Feb 04 2015 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 22 2011
STATUS
approved