A030802 a(n) = floor( exp(13/24)*n! ).

1, 3, 10, 41, 206, 1237, 8663, 69304, 623743, 6237432, 68611760, 823341124, 10703434623, 149848084733, 2247721271008, 35963540336130, 611380185714210, 11004843342855787, 209092023514259965, 4181840470285199316, 87818649875989185645, 1932010297271762084196, 44436236837250527936508, 1066469684094012670476201

Offset

1,2

Links

Muniru A Asiru, Table of n, a(n) for n = 1..100

Maple

Digits:=100: a:=n->floor(exp(13/24)*factorial(n)): seq(a(n), n=1..25); # Muniru A Asiru, Nov 21 2018

Mathematica

Floor[Exp[13/24]Range[30]!] (* Harvey P. Dale, Sep 12 2019 *)

Prog

(PARI)
default(realprecision, 1000);
a(n)=floor(exp(13/24)*n!);
/* Joerg Arndt, Jul 07 2012 */

Crossrefs

Sequence in context: A305405 A030927 A002627 * A030942 A030855 A030954

Adjacent sequences: A030799 A030800 A030801 * A030803 A030804 A030805

Keyword

nonn

Author

Simon Plouffe

Status

approved