VOOZH about

URL: https://oeis.org/A168034

⇱ A168034 - OEIS

login
A168034
Primes p for which floor(p^phi) is prime, where phi is the golden ratio.
2
2, 3, 5, 7, 17, 43, 59, 61, 109, 229, 263, 269, 419, 443, 457, 617, 997, 1069, 1301, 1373, 1483, 1523, 1543, 1801, 1877, 1949, 2053, 2269, 2309, 2411, 2503, 2551, 2633, 2731, 2741, 2887, 2963, 3023, 3181, 3323, 3359, 3571, 3607, 3673, 4129, 4153, 4423, 4483
OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
MATHEMATICA
$MaxExtraPrecision=6!; Select[Prime[Range[5! ]], PrimeQ[Floor[ #^GoldenRatio]]&]
PROG
(PARI) phi=(1+sqrt(5))/2; forprime(p=2, 1e4, if(isprime(floor(p^phi)), print1(p", "))) \\ Charles R Greathouse IV, Jul 29 2011
CROSSREFS
Sequence in context: A100532 A231480 A040149 * A034970 A048417 A071710
KEYWORD
nonn
AUTHOR
STATUS
approved