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

 

Logo

Many excellent designs for a new banner were submitted. We will use the best of them in rotation.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A168033 Primes p for which floor(phi^p) is prime. 1
2, 5, 7, 11, 13, 17, 19, 31, 37, 41, 47, 53, 61, 71, 79, 113, 313, 353, 503, 613, 617, 863, 1097, 1361, 4787, 4793, 5851, 7741, 8467, 10691, 12251, 13963 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Primes in A059791. [Charles R Greathouse IV, Jul 29 2011]

LINKS

Table of n, a(n) for n=1..32.

MATHEMATICA

$MaxExtraPrecision=6!; Select[Prime[Range[5! ]], PrimeQ[Floor[GoldenRatio^# ]]&]

PROG

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

CROSSREFS

Sequence in context: A020619 A165439 A228200 * A020591 A197188 A182320

Adjacent sequences:  A168030 A168031 A168032 * A168034 A168035 A168036

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, Nov 17 2009

EXTENSIONS

a(22)-a(32) from Charles R Greathouse IV, Jul 29 2011

STATUS

approved

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

Content is available under The OEIS End-User License Agreement .

Last modified April 20 06:17 EDT 2014. Contains 240779 sequences.