A182212 a(n) = floor(n! / Fibonacci(n)).

1, 2, 3, 8, 24, 90, 387, 1920, 10672, 65978, 448503, 3326400, 26725411, 231242151, 2143728472, 21198368680, 222722246772, 2477698802526, 29094738198716, 359630747697951, 4667544506825273, 63463425429259086, 902118740233973431, 13380961044971520000

Offset

1,2

Links

Table of n, a(n) for n=1..24.

Formula

a(n) = floor(A000142(n) / A000045(n)) = floor( n! / fibonacci(n) ), n>0.

Example

a(7) = floor(7! / Fibonacci[7]) = floor(5040/13) = 387. - T. D. Noe, Apr 19 2012

Mathematica

Table[Floor[n!/Fibonacci[n]], {n, 50}] (* T. D. Noe, Apr 19 2012 *)

Prog

(Python)
prpr = 0
prev = 1
fa = 1
for i in range(2, 26):
    print(fa//prev, end=', ')
    fa *= i
    current = prev + prpr
    prpr = prev
    prev = current

Crossrefs

Cf. A182213, A000045, A000142.

Sequence in context: A304121 A038561 A055981 * A120260 A202592 A002619

Adjacent sequences: A182209 A182210 A182211 * A182213 A182214 A182215

Keyword

nonn

Author

Alex Ratushnyak, Apr 19 2012

Status

approved