# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a193291
Showing 1-1 of 1

%I A193291 #16 Sep 03 2019 03:07:08
%S A193291 0,0,1,0,0,3,0,0,2,0,0,12,0,0,4,0,0,12,0,0,4,0,0,60,0,0,8,0,0,48,0,0,
%T A193291 4,0,0,128,0,0,4,0,0,48,0,0,16,0,0,288,0,0,4,0,0,96,0,0,16,0,0,768,0,
%U A193291 0,16,0,0,48,0,0,16,0,0,1280,0,0,24,0,0,96,0
%N A193291 Number of even divisors of Fibonacci(n).
%H A193291 Amiram Eldar, <a href="/A193291/b193291.txt">Table of n, a(n) for n = 1..1000</a>
%F A193291 a(n) = A183063(A000045(n)). - _Amiram Eldar_, Sep 03 2019
%e A193291 a(6) = 3 because Fibonacci(6) = 8 and the 3 even divisors are {2, 4, 8}.
%t A193291 a[n_] := Block[{d = Divisors[Fibonacci[n]]}, Count[EvenQ[d], True]]; Table[a[n], {n, 110}]
%o A193291 (PARI) a(n)=if(n%3,0,numdiv(fibonacci(n)/2)) \\ _Charles R Greathouse IV_, Jul 30 2011
%Y A193291 Cf. A000045, A183063.
%K A193291 nonn
%O A193291 1,6
%A A193291 _Michel Lagneau_, Jul 21 2011

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE