|
%I #18 Feb 22 2017 02:23:25
%S 1,8,274725,8903032600,21521701559085,9892478959203456,
%T 1527238784041075105,109733832449349303000,4483781212288588835625,
%U 118795734924428077310080,2233888850312257843810061,31811523551546985038211552,359951182400070234774044725
%N a(n) = (Product_{i=1..7} n^i+i) / 7!.
%C See A131685 about well-definedness. - _M. F. Hasler_, May 02 2015
%H G. C. Greubel, <a href="/A131677/b131677.txt">Table of n, a(n) for n = 0..1000</a>
%t Table[Product[ n^i + i, {i, 1, 7}]/7!, {n, 0, 12}] (* _Michael De Vlieger_, Jan 03 2016 *)
%o (PARI) A131677(n,k=7)=prod(i=1,k,(n^i+i))/k! \\ Changing the optional 2nd argument allows one to produce A000027 (k=1), A064808 (k=2), A131509 (k=3), A129995 (k=4), A131675 (k=5), ..., A131680 (k=10). - _M. F. Hasler_, May 02 2015
%K nonn,easy
%O 0,2
%A _Alexander R. Povolotsky_, Sep 15 2007
%E Definition made explicit by _M. F. Hasler_, May 02 2015
|
