%I #14 Nov 21 2013 12:46:29
%S 2,4,13,54,273,1640,11483,91870,826832,8268320,90951527,1091418329,
%T 14188438288,198638136041,2979572040628,47673152650059,
%U 810443595051004,14587984710918074,277171709507443410,5543434190148868200
%N Floor( exp(14/17)*n! ).
%H Vincenzo Librandi, <a href="/A030886/b030886.txt">Table of n, a(n) for n = 1..200</a>
%t With[{c=Exp[14/17]},Floor[c(Range[20]!)]] (* _Harvey P. Dale_, Nov 23 2011 *)
%K nonn
%O 1,1
%A _Simon Plouffe_