This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A163088 #5 Jul 26 2013 04:46:46
%S A163088 1,1,1,1,2,1,12,1,12,6,60,1,240,1,280,180,840,1,151200,1,90720,840,
%T A163088 5544,1,15523200,30,24024,3780,5765760,1,93405312000,1,10810800,16632,
%U A163088 437580,4200,6792641856000,1,1847560,72072,1173274502400
%N A163088 (Product{k|n} k$) / n$. Here '$' denotes the swinging factorial function (A056040).
%H A163088 Peter Luschny, <a href="http://www.luschny.de/math/primes/SwingingPrimes.html"> Swinging Primes.</a>
%p A163088 a := n -> A163087(n) / A056040(n):
%t A163088 sf[n_] := With[{f = Floor[n/2]}, Pochhammer[f+1, n-f]/f!]; a[0] = 1; a[n_] := Product[sf[k], {k, Divisors[n]}]/sf[n]; Table[a[n], {n, 0, 40}] (* _Jean-François Alcover_, Jul 26 2013 *)
%Y A163088 Cf. A163087, A163089.
%K A163088 nonn
%O A163088 0,5
%A A163088 _Peter Luschny_, Jul 21 2009