%I #18 Mar 13 2023 11:17:40
%S 1,2,3,8,24,90,387,1920,10672,65978,448503,3326400,26725411,231242151,
%T 2143728472,21198368680,222722246772,2477698802526,29094738198716,
%U 359630747697951,4667544506825273,63463425429259086,902118740233973431,13380961044971520000
%N a(n) = floor(n! / Fibonacci(n)).
%F a(n) = floor(A000142(n) / A000045(n)) = floor( n! / fibonacci(n) ), n>0.
%e a(7) = floor(7! / Fibonacci[7]) = floor(5040/13) = 387. - _T. D. Noe_, Apr 19 2012
%t Table[Floor[n!/Fibonacci[n]], {n, 50}] (* _T. D. Noe_, Apr 19 2012 *)
%o (Python)
%o prpr = 0
%o prev = 1
%o fa = 1
%o for i in range(2,26):
%o print(fa//prev, end=',')
%o fa *= i
%o current = prev + prpr
%o prpr = prev
%o prev = current
%Y Cf. A182213, A000045, A000142.
%K nonn
%O 1,2
%A _Alex Ratushnyak_, Apr 19 2012
|