[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A271168
Numbers n such that Fibonacci(n) divides p! where p is n-th prime.
2
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12, 14, 16, 18, 20, 24, 30, 36
OFFSET
1,2
COMMENTS
Inspired by A019532.
A019532 is a subsequence.
EXAMPLE
5 is a term because Fibonacci(5) = 5 divides prime(5)! = 11! = 39916800.
MAPLE
with(combinat): A271168:=n->`if`(ithprime(n)! mod fibonacci(n)=0, n, NULL): seq(A271168(n), n=1..40); # Wesley Ivan Hurt, Apr 01 2016
MATHEMATICA
Select[Range@ 40, Divisible[Prime[#]!, Fibonacci@ #] &] (* Michael De Vlieger, Apr 01 2016 *)
PROG
(PARI) for(n=1, 1e2, if(prime(n)! % fibonacci(n) == 0, print1(n, ", ")));
CROSSREFS
Cf. A019532.
Sequence in context: A130514 A130232 A103969 * A292514 A030141 A242367
KEYWORD
nonn,fini,full
AUTHOR
Altug Alkan, Mar 31 2016
STATUS
approved