OFFSET
1,1
COMMENTS
Tested up to n=250000. - Mark Rodenkirch, Feb 27 2020
LINKS
Eric Weisstein's World of Mathematics, Phi-Prime
EXAMPLE
floor(phi^863)=227160876495918562748535035942584201965901433059749617\
427535706949917136103176482875403653972639455945062095866005032008819\
9236184776437699830957031191632116265394965429613743580479 is prime.
MATHEMATICA
Block[{$MaxExtraPrecision=10000}, Select[Range[14000], PrimeQ[ Floor[ GoldenRatio^#]]&]] (* Harvey P. Dale, Mar 06 2017 *)
PROG
(PARI) isok(n) = isprime(floor(((sqrt(5)+1)/2)^n)) \\ Michel Marcus, Jul 14 2013
Terms generated and tested with pfgw then verified with PARI using the following:
(PARI) c(n) = 3*fibonacci(n-1) + fibonacci(n-2) + (n % 2) - 1; ispseudoprime(c(n)) \\ Mark Rodenkirch, Feb 27 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Naohiro Nomoto, Feb 22 2001
EXTENSIONS
More terms from Vladeta Jovovic, Feb 24 2001
a(27)-a(33) from Eric W. Weisstein, May 01 2006
a(34)-a(36) from Dmitry Kamenetsky, Dec 29 2008
a(37)-a(52) from Mark Rodenkirch, Feb 27 2020
STATUS
approved