A131679 a(n) = (Product_{i=1..9} n^i+i) / 9!.
1, 10, 524816325, 15995379784360900, 5136081211768056707885, 104827108835105429096703456, 359044402823940369662885183425, 354548318931625565271233374406000, 140230322081790179721500725877795625, 27516367648544953143193233240569070880, 3102623679344954347223585172112606310061
Offset: 0
Programs
-
Mathematica
Table[Product[ n^i + i, {i, 1, 9}]/9!, {n, 0, 10}] (* Michael De Vlieger, Jan 03 2016 *) -
PARI
A131679(n,k=9)=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
Extensions
Definition made explicit by M. F. Hasler, May 02 2015
Comments