A030799 a(n) = floor(exp(1/2)*n!).

1, 3, 9, 39, 197, 1187, 8309, 66476, 598287, 5982879, 65811677, 789740126, 10266621646, 143732703044, 2155990545670, 34495848730735, 586429428422497, 10555729711604956, 200558864520494172, 4011177290409883459

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..449

Formula

a(n+1) = (n+1)*a(n) + A068453(n+1). - Robert Israel, Oct 16 2019

Maple

f:= n -> floor(exp(1/2)*n!):
map(f, [$1..30]); # Robert Israel, Oct 16 2019

Mathematica

Floor[Exp[1/2]Range[20]!] (* Harvey P. Dale, Aug 19 2020 *)

Crossrefs

Cf. A068453.

Sequence in context: A278749 A208816 A130905 * A273396 A058105 A090012

Adjacent sequences: A030796 A030797 A030798 * A030800 A030801 A030802

Keyword

nonn

Author

Simon Plouffe

Status

approved