A226033 Round(n * exp(-1 - 1/(2n))), an approximation to the number of daughters to wait before picking in the sultan's dowry problem (Better that A225593).

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

Offset

1,5

Comments

It is very similar to the sequence A054404, but differs for example at n=97 (see A226082).

Links

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

Eric Weisstein's World of Mathematics, Sultan's Dowry Problem.

Maple

A226033 := proc(n)
    round(n/exp(1+1/2/n)) ;
end proc: # R. J. Mathar, Jun 09 2013

Mathematica

Table[Round[n*E^(-1-1/(2*n))], {n, 100}]

Crossrefs

Cf. A054404, A225593.

Sequence in context: A353090 A077219 A026405 * A054404 A334415 A307152

Adjacent sequences: A226030 A226031 A226032 * A226034 A226035 A226036

Keyword

nonn

Author

José María Grau Ribas, May 24 2013

Status

approved