login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A168032 Primes p for which floor(p*phi) is prime, where phi is the golden ratio. 1
2, 7, 11, 23, 37, 79, 101, 107, 131, 149, 163, 227, 241, 283, 311, 353, 367, 379, 383, 409, 419, 457, 487, 509, 613, 661, 719, 761, 797, 971, 997, 1049, 1279, 1321, 1373, 1447, 1451, 1453, 1483, 1531, 1613, 1699, 1861, 1877, 2011, 2039, 2069, 2137, 2143 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

MATHEMATICA

Select[Prime[Range[6! ]], PrimeQ[Floor[GoldenRatio*# ]]&]

PROG

(PARI) phi=(1+sqrt(5))/2; forprime(p=2, 1e5, if(isprime(floor(p*phi)), print1(p", "))) \\ Charles R Greathouse IV, Jul 29 2011

CROSSREFS

Sequence in context: A075431 A184799 A045374 * A217304 A179876 A088179

Adjacent sequences:  A168029 A168030 A168031 * A168033 A168034 A168035

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, Nov 17 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified January 18 20:19 EST 2018. Contains 297865 sequences.