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 A105769 #8 Jan 18 2025 21:56:49 %S A105769 1,1,1,1,1,1,1,1,1,1,1,1,11,1,1,13,55,1,1,1,1,1,175,325,13,253,1,1,1, %T A105769 1,1,23,1,1,1,1,5,1,1,19,11,19,5,35,1,1,629,1,253,29,1,1,29,31,43,37, %U A105769 5,13,43,1,1219,1,55,5,186599,1,72283,1,29,1,47,1,1,1,1711,1,25,1,1,1,67,1 %N A105769 a(n) = A105658(n)/k, where k=n if n is odd, else k=n/2. %C A105769 Records: 1,11,13,55,175,325,629,1219,186599,6298799,24804047515,..., which occur at: 1,13,16,17,23,24,47,61,65,180,337,... %t A105769 f[n_] := f[n] = Product[i^i, {i, n}]/Denominator[Sum[j(j + 1)/2/(Product[j!/k!, {k, 0, j - 1}]), {j, n}]]; Table[ If[ OddQ[n], f[n]/n, 2f[n]/n], {n, 82}] %Y A105769 Cf. A105658, A105731, A105732. %K A105769 nonn %O A105769 1,13 %A A105769 Jess E. Boling (tdbpeekitup(AT)yahoo.com) and _Robert G. Wilson v_, Apr 18 2005