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 A145738 #8 Jun 02 2025 00:41:14
%S A145738 3,1,1,761,61,509,1171733,8431,39541,55835135,36093,1347822955,
%T A145738 34395742267,375035183,9682292227,586061125622639,54062195834749,
%U A145738 40030624861,2053580969474233,1236275063173,6657281227331
%N A145738 a(n) = squarefree part of A145609(n).
%t A145738 m = 1; aa = {}; Do[k = 0; Do[k = k + m^(2 r + 1 - d)/d, {d, 1, 2 r}]; b = Sqrt[Numerator[k]] /. Sqrt[_] -> 1; c = Sqrt[Numerator[k]]/b /. Sqrt[x_] -> x; AppendTo[aa, c], {r, 1, 25}]; aa
%Y A145738 Cf. A128059, A145609, A145738, A145737 (for square parts).
%K A145738 nonn
%O A145738 1,1
%A A145738 _Artur Jasinski_, Oct 17 2008