Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #22 Sep 08 2022 08:45:12
%S 1,2,1,12,8,240,180,1120,8064,725760,604800,79833600,68428800,
%T 830269440,10897286400,2615348736000,2324754432000,711374856192000,
%U 640237370572800,11585247657984000,221172909834240000,102181884343418880000,93666727314800640000
%N Denominator of Sum/Product of first n numbers.
%C a(n) = A000142(n)/A069268(n);
%C a(p-1) = 2*A000142(p-2) for odd primes.
%C a(n) = A060593((n - 1)/2) for odd n. - _Gregory Gerard Wojnar_, Jun 10 2021
%H Robert Israel, <a href="/A090586/b090586.txt">Table of n, a(n) for n = 1..451</a>
%p seq(denom((n+1)/(2*(n-1)!)),n=1..25); # _Robert Israel_, Oct 14 2018
%t Table[Denominator[(n + 1) / (2 (n - 1)!)], {n, 25}] (* _Vincenzo Librandi_, Oct 15 2018 *)
%o (Magma) [Denominator(n + 1) / (2*Factorial(n - 1)): n in [1..30]]; // _Vincenzo Librandi_, Oct 15 2018
%Y Cf. A090585 (numerator), A060593.
%Y Main diagonal of A093420.
%K nonn,frac
%O 1,2
%A _Reinhard Zumkeller_, Dec 03 2003