A086707 Smallest mode of the sequences n/(n-k)*binomial(n,n-k) (see link).

0, 1, 1, 1, 1, 2, 2, 2, 3, 3, 3, 3, 4, 4, 4, 5, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 8, 8, 8, 8, 9, 9, 9, 9, 10, 10, 10, 11, 11, 11, 11, 12, 12, 12, 13, 13, 13, 13, 14, 14, 14, 14, 15, 15, 15, 16, 16, 16, 16, 17, 17, 17, 18, 18, 18, 18, 19, 19, 19, 19, 20, 20, 20, 21, 21, 21, 21, 22, 22, 22, 22

Offset

1,6

Links

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

Moussa Benoumhani, A Sequence of Binomial Coefficients Related to Lucas and Fibonacci Numbers, J. Integer Seqs., Vol. 6, 2003, Article 03.2.1.

Formula

a(n) = ceiling(1/10*(5*n-4-sqrt(5*n^2-4))).

Mathematica

 Table[Ceiling[1/10 (5 n - 4 - Sqrt[5 n^2 - 4])], {n, 1, 100}] (* Vincenzo Librandi, May 21 2015 *)

Prog

(PARI) vector(80, n, ceil(1/10*(5*n-4-sqrt(5*n^2-4)))) \\ Michel Marcus, May 20 2015
(Magma) [Ceiling(1/10*(5*n-4-Sqrt(5*n^2-4))): n in [1..100]]; // Vincenzo Librandi, May 21 2015

Crossrefs

Sequence in context: A274024 A285189 A051889 * A217538 A333348 A194920

Adjacent sequences: A086704 A086705 A086706 * A086708 A086709 A086710

Keyword

nonn

Author

Benoit Cloitre, Jul 28 2003

Status

approved