OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
For n = 3: GCD(3!, Fibonacci(3)) = 2.
For n = 4: GCD(4!, Fibonacci(4)) = 3.
For n = 9: GCD(9!, Fibonacci(9)) = 2.
MAPLE
select(n -> isprime(igcd(n!, combinat:-fibonacci(n))), [$1..1000]); # Robert Israel, Nov 24 2014
MATHEMATICA
Select[Range[300], PrimeQ[GCD[#!, Fibonacci[#]] ] &]
PROG
(PARI) for(n=1, 10^3, if(isprime(gcd(n!, fibonacci(n))), print1(n, ", "))) \\ Derek Orr, Nov 23 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Carlos Eduardo Olivieri, Nov 23 2014
STATUS
approved