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 A105731 #9 Jan 18 2025 21:56:32
%S A105731 13,17,23,25,37,41,43,47,49,53,55,57,59,61,63,65,67,69,71,75,77,81,83,
%T A105731 85,97,99,103,107,111,117,121,123,125,127,129,131,137,139,143,145,149,
%U A105731 151,153,157,159,161,163,169,173,177,179,181,183,189,191,193,195,197
%N A105731 Odd numbers k such that A105658(k) != k.
%t A105731 f[n_] := f[n] = Product[i^i, {i, n}]/Denominator[ Sum[j(j + 1)/2/(Product[j!/k!, {k, 0, j - 1}]), {j, n}]]; Select[ Range[1, 200, 2], f[ # ] != # &]
%Y A105731 Cf. A105658, A105732, A105733, A105769.
%K A105731 nonn
%O A105731 1,1
%A A105731 Jess E. Boling (tdbpeekitup(AT)yahoo.com) and _Robert G. Wilson v_, Apr 18 2005