A030428 a(n) = 0! * 1! * 2! * ... * n! - 1.
0, 0, 1, 11, 287, 34559, 24883199, 125411327999, 5056584744959999, 1834933472251084799999, 6658606584104736522239999999, 265790267296391946810949631999999999, 127313963299399416749559771247411199999999999
Offset: 0
Programs
-
Mathematica
Table[BarnesG[n] - 1, {n, 2, 12}] (* Zerinvary Lajos, Jul 16 2009 *) FoldList[Times,1,Range[10]!]-1 (* Harvey P. Dale, Feb 05 2012 *)
Formula
a(n) = A000178(n) - 1. - Sean A. Irvine, Mar 31 2020
Extensions
Name corrected by Arkadiusz Wesolowski, Oct 03 2011
More terms from Harvey P. Dale, Feb 05 2012